4.2.2 Abbreviated Size Notation for Numeric Data Types (Sun Studio 12: Fortran User's Guide)

Sun Studio 12: Fortran User's Guide

4.2.2 Abbreviated Size Notation for Numeric Data Types

f95 allows the following nonstandard type declaration forms in declaration statements, function statements, and IMPLICIT statements. The form in column one is nonstandard Fortran 95, though in common use. The kind numbers in column two can vary by vendor.

Table 4–2 Size Notation for Numeric Data Types


Nonstandard	Declarator	Short Form	Meaning
*`INTEGER1`**	`INTEGER(KIND=1)`	`INTEGER(1)`	One-byte signed integers
*`INTEGER2`**	`INTEGER(KIND=2)`	`INTEGER(2)`	Two-byte signed integers
*`INTEGER4`**	`INTEGER(KIND=4)`	`INTEGER(4)`	Four-byte signed integers
*`LOGICAL1`**	`LOGICAL(KIND=1)`	`LOGICAL(1)`	One-byte logicals
*`LOGICAL2`**	`LOGICAL(KIND=2)`	`LOGICAL(2)`	Two-byte logicals
*`LOGICAL4`**	`LOGICAL(KIND=4)`	`LOGICAL(4)`	Four-byte logicals
*`REAL4`**	`REAL(KIND=4)`	`REAL(4)`	IEEE single-precision four-byte floating-point
*`REAL8`**	`REAL(KIND=8)`	`REAL(8)`	IEEE double-precision eight-byte floating-point
*`REAL16`**	`REAL(KIND=16)`	`REAL(16)`	IEEE quad-precision sixteen-byte floating-point
*`COMPLEX8`**	`COMPLEX(KIND=4)`	`COMPLEX(4)`	Single-precision complex (four bytes each part)
*`COMPLEX16`**	`COMPLEX(KIND=8)`	`COMPLEX(8)`	Double-precision complex (eight bytes each part)
*`COMPLEX32`**	`COMPLEX(KIND=16)`	`COMPLEX(16)`	Quad-precision complex (sixteen bytes each part)