Semordnilap: Difference between revisions

m
→‎version 2: used the true lengths.
m (→‎version 2: bullet-proofed (as per the word length) the printing of the results.)
m (→‎version 2: used the true lengths.)
Line 2,868:
r= reverse(u) /*obtain reverse of the dictionary word*/
if @.r\=='' then do; #= # + 1 /*found a semordnilap word; bump count.*/
if #<=n then say right(@.r, max(32, length(_@.r) ) )',' _u
end
@.u= _ /*define reverse of the dictionary word*/