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

4 lines
195 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]).
% 10,875,184 inferences, 1.840 CPU in 1.996 seconds (92% CPU, 5910426 Lips)
beginning-iddle-ending