| Reminds me....
Someone from Control Data once told me about a Fortran scrambling program
he had seen in action. It converted all integer variables to a 6-character
combination of I's and 1's(ones), all reals to a similar combination of
O's and 0's(zeros) and all statement numbers to random 5-digit numbers.
Of course all comments, blank lines and indentation was removed too.
Since lines could get longer, continuations were added in.
The function of the program was unaltered; it compiled and ran correctly.
For example:
do 10 i=1,n
if(a(i).lt.b) go to 20
10 continue
became
DO 68756 I11111=1,I1III1
IF(O00OO0(I11111).LT.OOO0O0) GO TO 72901
68756 CONTINUE
On certain line printers the output was really unreadable!
|