1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198
INTEGER
REAL
DOUBLE PRECISION
DOUBLEPRECISION
COMPLEX
CHARACTER
LOGICAL
ALLOCATABLE
ALLOCATE
BACKSPACE
CALL
CASE
CLOSE
COMMON
CONTAINS
CONTINUE
CYCLE
DATA
DEALLOCATE
DIMENSION
DO
END
EQUIVALENCE
EXIT
EXTERNAL
FORMAT
GO TO
GOTO
IMPLICIT
IMPLICIT NONE
INQUIRE
INTENT
INTRINSIC
MODULE PROCEDURE
NAMELIST
NULLIFY
OPEN
OPTIONAL
PARAMETER
POINTER
PRINT
PRIVATE
PUBLIC
READ
RETURN
REWIND
SAVE
SELECT
STOP
TARGET
WHILE
WRITE
BLOCK DATA
BLOCKDATA
END BLOCK DATA
ENDBLOCKDATA
DO
ENDDO
FILE
FORALL
FUNCTION
IF
END IF
INTERFACE
MODULE
PROGRAM
SELECT
SUBROUTINE
TYPE
WHERE
ASSIGNMENT
DEFAULT
ELEMENTAL
ELSE
ELSEWHERE
ELSEIF
ENTRY
IN
INCLUDE
INOUT
KIND
NULL
ONLY
OPERATOR
OUT
PURE
RECURSIVE
RESULT
SEQUENCE
STAT
THEN
USE
----------------------------------------------------
[
["keyword", "INTEGER"],
["keyword", "REAL"],
["keyword", "DOUBLE PRECISION"],
["keyword", "DOUBLEPRECISION"],
["keyword", "COMPLEX"],
["keyword", "CHARACTER"],
["keyword", "LOGICAL"],
["keyword", "ALLOCATABLE"],
["keyword", "ALLOCATE"],
["keyword", "BACKSPACE"],
["keyword", "CALL"],
["keyword", "CASE"],
["keyword", "CLOSE"],
["keyword", "COMMON"],
["keyword", "CONTAINS"],
["keyword", "CONTINUE"],
["keyword", "CYCLE"],
["keyword", "DATA"],
["keyword", "DEALLOCATE"],
["keyword", "DIMENSION"],
["keyword", "DO"],
["keyword", "END"],
["keyword", "EQUIVALENCE"],
["keyword", "EXIT"],
["keyword", "EXTERNAL"],
["keyword", "FORMAT"],
["keyword", "GO TO"],
["keyword", "GOTO"],
["keyword", "IMPLICIT"],
["keyword", "IMPLICIT NONE"],
["keyword", "INQUIRE"],
["keyword", "INTENT"],
["keyword", "INTRINSIC"],
["keyword", "MODULE PROCEDURE"],
["keyword", "NAMELIST"],
["keyword", "NULLIFY"],
["keyword", "OPEN"],
["keyword", "OPTIONAL"],
["keyword", "PARAMETER"],
["keyword", "POINTER"],
["keyword", "PRINT"],
["keyword", "PRIVATE"],
["keyword", "PUBLIC"],
["keyword", "READ"],
["keyword", "RETURN"],
["keyword", "REWIND"],
["keyword", "SAVE"],
["keyword", "SELECT"],
["keyword", "STOP"],
["keyword", "TARGET"],
["keyword", "WHILE"],
["keyword", "WRITE"],
["keyword", "BLOCK DATA"],
["keyword", "BLOCKDATA"],
["keyword", "END BLOCK DATA"],
["keyword", "ENDBLOCKDATA"],
["keyword", "DO"],
["keyword", "ENDDO"],
["keyword", "FILE"],
["keyword", "FORALL"],
["keyword", "FUNCTION"],
["keyword", "IF"],
["keyword", "END IF"],
["keyword", "INTERFACE"],
["keyword", "MODULE"],
["keyword", "PROGRAM"],
["keyword", "SELECT"],
["keyword", "SUBROUTINE"],
["keyword", "TYPE"],
["keyword", "WHERE"],
["keyword", "ASSIGNMENT"],
["keyword", "DEFAULT"],
["keyword", "ELEMENTAL"],
["keyword", "ELSE"],
["keyword", "ELSEWHERE"],
["keyword", "ELSEIF"],
["keyword", "ENTRY"],
["keyword", "IN"],
["keyword", "INCLUDE"],
["keyword", "INOUT"],
["keyword", "KIND"],
["keyword", "NULL"],
["keyword", "ONLY"],
["keyword", "OPERATOR"],
["keyword", "OUT"],
["keyword", "PURE"],
["keyword", "RECURSIVE"],
["keyword", "RESULT"],
["keyword", "SEQUENCE"],
["keyword", "STAT"],
["keyword", "THEN"],
["keyword", "USE"]
]
----------------------------------------------------
Checks for keywords.