RosettaCodeData/Task/Longest-common-subsequence/Prolog/longest-common-subsequence-4.pro

4 lines
190 B
Prolog
Raw Permalink Normal View History

2013-04-10 21:29:02 -07:00
?- time(lcs("beginning-middle-ending","beginning-diddle-dum-ending", Lcs)),writef('%s', [Lcs]).
% 2,376 inferences, 0.010 CPU in 0.003 seconds (300% CPU, 237600 Lips)
beginning-iddle-ending