\\ A ACCEPT B BYTE C CONTINUE D DO 0+ E ELSE0+ F FOR (0+ G GOTO H COMMON / I IF (0+ 1 CHARACTER* 2 INTEGER*2 4 INTEGER*4 8 REAL*8 6 REAL*16 J DIMENSION K CALL L LOGICAL M END N FUNCTION O READ ( P PARAMETER Q SWITCH (0+ {00 }0- R RETURN S SUBROUTINE T TYPE U REAL W WRITE ( X WHILE (0+ Z ELSE IF (0+ = EQUIVALENCE ( - IMPLICIT INTEGER*4 (A - Z) ( OPEN (UNIT = ) CLOSE (UNIT = @ INCLUDE " !# =