/usr/share/THE/fortran.tld is in the 3.3~rc1-3.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
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 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 | *
* This file contains the THE Language Definition for FORTRAN
* It is based heavily on Kedit's KLD file format.
*
* Name = FORTRAN
*
:case
ignore
:option
function ( blank
:number
c
:identifier
[a-zA-Z_$] [a-zA-Z0-9_$]
:string
single backslash
double backslash
:comment
line C column 1
line * column 1
line ! any
:label
* column 1
:match
( )
:keyword
ALLOCATABLE
ALLOCATE
ASSIGN
AUTOMATIC
BACKSPACE
BLOCK
BYTE
CALL
CASE
CHARACTER
CLOSE
COMMON
COMPLEX
CONTAINS
CONTINUE
CYCLE
DATA
DEALLOCATE
DIMENSION
DO
DOUBLE
ELSE
ELSEWHERE
END
ENDFILE
ENTRY
EQUIVALENCE
EXIT
EXTERNAL
FORALL
FORMAT
FUNCTION
GOTO
IF
IMPLICIT
INQUIRE
INTEGER
INTENT
INTERFACE
INTRINSIC
LOGICAL
MODULE
NAMELIST
NULLIFY
OPEN
OPTIONAL
PARAMETER
PAUSE
POINTER
PRECISION
PRINT
PRIVATE
PROCEDURE
PROGRAM
PUBLIC
READ
REAL
RETURN
REWIND
SAVE
SELECT
SEQUENCE
STATIC
STOP
SUBROUTINE
TARGET
TYPE
USE
VIRTUAL
VOLATILE
WAIT
WHERE
WHILE
WRITE
* Other keywords
ENDDO
ENDFORALL
ENDIF
ENDINTERFACE
ENDSELECT
ENDTYPE
ENDWHERE
GO
SELECTCASE
THEN
TO
* Logical operators
AND
EQV
OR
NEQV
NOT
XOR
* Relational operators
EQ
GT
GE
LE
LT
NE
:function
ABORT
ABS
ACHAR
ACOS
ACOSD
ADJUSTL
ADJUSTR
AIMAG
AINT
ALL
ALLOCATED
ANINT
ANY
ASIN
ASIND
ASSOCIATED
ATAN
ATAND
ATAN2
ATAN2D
BIT_SIZE
BTEST
CEILING
CHAR
CMPLX
CONJG
COS
COSD
COSH
COUNT
CSHIFT
CVMGx
DATE_AND_TIME
DBLE
DCMPLX
DIGITS
DIM
DOT_PRODUCT
DPROD
EOSHIFT
EPSILON
ERF
ERFC
EXP
EXPONENT
FLOOR
FRACTION
GAMMA
GETENV
HFIX
HUGE
IACHAR
IAND
IBCLR
IBITS
IBSET
ICHAR
IEOR
ILEN
IMAG
INDEX
INT
IOR
ISHFT
ISHFTC
KIND
LBOUND
LEADZ
LEN
LEN_TRIM
LGAMMA
LGE
LGT
LLE
LLT
LOC
LOG
LOGICAL
LOG10
LSHIFT
MATMUL
MAX
MAXEXPONENT
MAXLOC
MAXVAL
MERGE
MIN
MINEXPONENT
MINLOC
MINVAL
MOD
MODULO
MVBITS
NEAREST
NINT
NOT
NUM_PARTHDS
NUM_USRTHDS
NUMBER_OF_PROCESSORS
PACK
PRECISION
PRESENT
PROCESSORS_SHAPE
PRODUCT
QCMPLX
QEXT
RADIX
RAND
RANDOM_NUMBER
RANDOM_SEED
RANGE
REAL
REPEAT
RESHAPE
RRSPACING
RSHIFT
SCALE
SCAN
SELECTED_INT_KIND
SELECTED_REAL_KIND
SET_EXPONENT
SHAPE
SIGN
SIGNAL
SIN
SIND
SINH
SIZE
SPACING
SPREAD
SQRT
SRAND
SUM
SYSTEM
SYSTEM_CLOCK
TAN
TAND
TANH
TINY
TRANSFER
TRANSPOSE
TRIM
UBOUND
UNPACK
VERIFY
:column
exclude 2 7
|