Triplet of three numbers: Difference between revisions

m
→‎{{header|REXX}}: elided a dead variable.
m (→‎{{header|REXX}}: aligned a statement.)
m (→‎{{header|REXX}}: elided a dead variable.)
Line 595:
=={{header|REXX}}==
<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.*/