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

mirror of https://github.com/acmeism/RosettaCodeData.git
?- 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
	`?- 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`