\\ A ACCEPT B BYTE C CONTINUE D DO E ELSE-+ F FORMAT ( G GO TO H COMMON / I IF (0+ THEN00 ENDIF0- 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 IF ( R RETURN S SUBROUTINE T TYPE U REAL W WRITE ( X DO WHILE (0+ ENDDO0- Z ELSE IF (-+ THEN00 = EQUIVALENCE ( - IMPLICIT INTEGER*4 (A - Z) ( OPEN (UNIT= ) CLOSE (UNIT= !! @ INCLUDE ' =