Prime words: Difference between revisions

m
→‎{{header|REXX}}: changed wording for the output text.
m (→‎{{header|REXX}}: changed wording for the output text.)
Line 608:
=={{header|REXX}}==
No attempt was made to exclude any "word" if it contained any non-letter (Latin alphabet) characters.
<lang rexx>/*REXX pgprogram finds words whose ASCII code for its letters (withinare anprime (in identifieda dictionary).*/
parse arg iFID . /*obtain optional arguments from the CL*/
if iFID=='' | iFID=="," then iFID='unixdict.txt' /*Not specified? Then use the default.*/
Line 626:
end /*recs*/ /* [↑] semaphore name is uppercased. */
say
say copies('"'", 30) recs "usable words in the dictionary file: " iFID
say
say 'found ' # " prime words in the dictionary."
Line 676:
q
 
────────────────────────────── 25104 usable words in the dictionary file: unixdict.txt
 
found 36 prime words in the dictionary.