RosettaCodeData/Task/Longest-common-subsequence/J/longest-common-subsequence-6.j
2023-07-01 13:44:08 -04:00

1 line
91 B
Text

lcs=:;(($:}.) longest }.@[ $: ])`({.@[,$:&}.)@.(=&{.)`((i.0)"_)@.(+.&(0=#))&((e.#[)&>/) ;~