Next: , Up: Extensions

5.1 Old-style kind specifications

GNU Fortran allows old-style kind specifications in declarations. These look like:

           TYPESPEC*size x,y,z

where TYPESPEC is a basic type (INTEGER, REAL, etc.), and where size is a byte count corresponding to the storage size of a valid kind for that type. (For COMPLEX variables, size is the total size of the real and imaginary parts.) The statement then declares x, y and z to be of type TYPESPEC with the appropriate kind. This is equivalent to the standard-conforming declaration

           TYPESPEC(k) x,y,z

where k is equal to size for most types, but is equal to size/2 for the COMPLEX type.