Triplet of three numbers: Difference between revisions

m
→‎{{header|REXX}}: aligned a statement.
m (→‎{{header|REXX}}: simplified the code.)
m (→‎{{header|REXX}}: aligned a statement.)
Line 596:
<lang rexx>/*REXX pgm finds prime triplets (Alabama primes) such that P, P-1, and P+2 are primes.*/
parse arg hi cols . /*obtain optional argument from the CL.*/
if hi=='' | hi=="," then hi= 6000 /*Not specified? Then use the default.*/
call genP /*build array of semaphores for primes.*/
w= length( commas(hi) ) /*the width of the largest number. */