f95 允许在声明语句、函数语句和 IMPLICIT 语句中使用以下非标准的类型声明格式。第一列中的格式虽然已被广泛使用,但它们是非标准的 Fortran 95 格式。第二列中的种类数字可能会因供应商不同而异。
表 4–2 数值数据类型的大小表示法
非标准 |
声明符 |
简短形式 |
含义 |
---|---|---|---|
INTEGER*1 |
INTEGER(KIND=1) |
INTEGER(1) |
有符号的单字节整数 |
INTEGER*2 |
INTEGER(KIND=2) |
INTEGER(2) |
有符号的双字节整数 |
INTEGER*4 |
INTEGER(KIND=4) |
INTEGER(4) |
有符号的 4 字节整数 |
LOGICAL*1 |
LOGICAL(KIND=1) |
LOGICAL(1) |
单字节逻辑值 |
LOGICAL*2 |
LOGICAL(KIND=2) |
LOGICAL(2) |
双字节逻辑值 |
LOGICAL*4 |
LOGICAL(KIND=4) |
LOGICAL(4) |
4 字节逻辑值 |
REAL*4 |
REAL(KIND=4) |
REAL(4) |
IEEE 单精度 4 字节浮点值 |
REAL*8 |
REAL(KIND=8) |
REAL(8) |
IEEE 双精度 8 字节浮点值 |
REAL*16 |
REAL(KIND=16) |
REAL(16) |
IEEE 四精度 16 字节浮点值 |
COMPLEX*8 |
COMPLEX(KIND=4) |
COMPLEX(4) |
单精度复数(每个部分 4 个字节) |
COMPLEX*16 |
COMPLEX(KIND=8) |
COMPLEX(8) |
双精度复数(每个部分 8 个字节) |
COMPLEX*32 |
COMPLEX(KIND=16) |
COMPLEX(16) |
四精度复数(每个部分 16 个字节) |