In a tribute to John W Backus and his team of
IBM super programmers who developed the first
FORTRAN compiler from scratch in 1954-57,
how about trying for a JAPH consisting
only of valid FORTRAN 0 characters?

AN EXAMPLE FORTRAN 0 PROGRAM
----------------------------
        DIMENSION A(11)
        READ A
 2      DO 3,8,11 J=1,11
 3      I=11-J
        Y=SQRT(ABS(A(I+1)))+5*A(I+1)**3
        IF (400>=Y) 8,4
 4      PRINT I,999.
        GOTO 2
 8      PRINT I,Y
 11     STOP

Unfortunately, I am not sure of the valid FORTRAN 0
character set, but I hope it does not allow lower
case characters since that is what makes the JAPH
interesting.

Andrew.

Reply via email to