Longest common suffix: Difference between revisions

Content added Content deleted
(Added 11l)
Line 7: Line 7:
{{Template:Strings}}
{{Template:Strings}}
<br><br>
<br><br>

=={{header|11l}}==
<lang 11l>F lcs(sa)
I sa.empty
R ‘’
I sa.len == 1
R sa[0]

V min_len = min(sa.map(s -> s.len))

L(i) 1 .. min_len
V p = sa[0][(len)-i]
L(j) 1 .< sa.len
I sa[j][(len)-i] != p
R sa[0][(len)-i+1..]

R sa[0][(len)-min_len..]

print(lcs([‘11Sunday’, ‘2Sunday’]))
print(lcs([‘Sunday’, ‘Monday’, ‘Tuesday’]))
print(lcs([‘Sunday’, ‘Monday’, ‘Tuesday’, ‘day’]))
print(lcs([‘Sondag’, ‘Maandag’, ‘Dinsdag’, ‘Woensdag’]))</lang>

{{out}}
<pre>
Sunday
day
day
dag
</pre>


=={{header|ALGOL 68}}==
=={{header|ALGOL 68}}==