Anonymous user
Longest common substring: Difference between revisions
m
→{{header|REXX}}: added a EXIT code.
m (→{{header|REXX}}: added a EXIT code.) |
|||
Line 2,073:
say ' string B =' b /* " " B " " " " */
say ' LCsubstr =' LCsubstr(a, b) /*display the Longest Common Substring.*/
exit
/*──────────────────────────────────────────────────────────────────────────────────────*/
LCsubstr: procedure; parse arg x,y,,$; #= 0 /*LCsubstr: Longest Common Substring. */
| |||