C
!
*
!
D
"
"
'
'
(
)
<=
>=
>
<
&
/=
==
=>
%
.lt.
.gt.
.eq.
.ne.
.le.
.ge.
.AND.
.OR.
END[[:space:]]*SUBROUTINE
SUBROUTINE
END[[:space:]]*FUNCTION
FUNCTION
END[[:space:]]*PROGRAM
PROGRAM
END[[:space:]]*MODULE
MODULE
END[[:space:]]*INTERFACE
INTERFACE
END[[:space:]]*TYPE
TYPE
REA
L
DOUBLE
PRECISION
IMPLICIT
NONE
INCLUDE
PROGRAM
MODULE
INTERFACE
SUBROUTINE
SUBROUTINE
FUNCTION
CONTAINS
USE
ONLY
CALL
RETURN
TYPE
SAVE
IMPLICIT
EXPLICIT
DATA
PUBLIC
PRIVATE
PARAMETER
INTEGER
REAL
COMPLEX
LOGICAL
CHARACTER
DIMENSION
KIND
POINTER
ALLOCATABLE
INTENT
ALLOCATE
ALLOCATED
DEALLOCATE
CASE
SELECT
DEFAULT
CONTINUE
CYCLE
DO
WHILE
ELSE
IF
IFDEF
ELSEIF
THEN
ELSEWHERE
END
ENDIF
ENDDO
FORALL
WHERE
EXIT
GOTO
PAUSE
STOP
BACKSPACE
CLOSE
ENDFILE
INQUIRE
OPEN
PRINT
READ
REWIND
WRITE
FORMAT
AIMAG
AINT
AMAX0
AMIN0
ANINT
CEILING
CMPLX
CONJG
DBLE
DCMPLX
DFLOAT
DIM
DPROD
FLOAT
FLOOR
IFIX
IMAG
INT
MODULO
NINT
SIGN
SNGL
TRANSFER
ZEXT
ABS
ACOS
AIMAG
AINT
ALOG
ALOG10
AMAX0
AMAX4
AMIN0
AMIN1
AMOD
ANINT
ASIN
ATAN
ATAN2
CABS
CCOS
CHAR
CLOG
CMPLX
CONJG
COS
COSH
CSIN
CSQRT
DABS
DACOS
DASIN
DATAN
DATAN2
DBLE
DCOS
DCOSH
DDIM
DEXP
DIM
DINT
DLOG
DLOG10
DMAX1
DMIN1
DMOD
DNINT
DPROD
DREAL
DSIGN
DSIN
DSINH
DSQRT
DTAN
DTANH
EXP
FLOAT
IABS
ICHAR
IDIM
IDINT
IDNINT
IFIX
INDEX
INT
ISIGN
LEN
LGE
LGT
LLE
LLT
LOG
LOG10
MAX
MAX0
MAX1
MIN
MIN0
MIN1
MOD
NINT
SIGN
SIN
SINH
SNGL
SQRT
TAN
TANH
.FALSE.
.TRUE.
BLANK
LBOUND
UBOUND
SHAPE
SIZE
MERGE
PACK
UNPACK
RESHAPE
SPREAD
CSHIFT
EOSHIFT
TRASPOSE
MAXLOC
MINLOC
NULL
DATE_AND_TIME
SYSTEM_CLOCK
CPU_TIME
RANDOM_NUMBER
RANDOM_SEED
ANY
ALL
MAXVAL
MINVAL
PRODUCT
SUM
COUNT
ADJUSTL
ADJUSTR
TRIM
LEN_TRIM
SCAN
VERIFY
REPEAT
DIGITS
EPSILON
HUGE
TINY
MAXEXPONENT
MINEXPONENT
PRECISIOn
RADIX
RANGE
FRACTION
NEAREST
RRSPACING
SCALE
SET_EXPONENT
SPACING
SELECTED_INT_KIND
SELECTED_REAL_KIND
BIT_SIZE
BTEST
IAND
IBCLR
IBITS
IBSET
IEOR
IOR
ISHFT
ISHFTC
MVBITS
DOT_PRODUCT
MATMUL