KIND intrinsic function
Standard: F77 F90 F95 F2003 F2008
  Example Program

KIND ( X )

X : scalar or array of any intrinsic type;

Result: scalar Integer with default kind.


The KIND intrinsic function returns the kind type parameter value of X. This is an enquiry function; X need not have a value, and indeed can even be an unallocated allocatable variable or a disassociated or undefined pointer.

In Fortran 2003, this enquiry may also be performed on a variable using the “%kind” formulation (and this can be done even if KIND is not available for use as an intrinsic function, for example, if it is the name of another local variable).

CHARACTER type, COMPLEX type, INTEGER type, LEN intrinsic function, LOGICAL type, REAL type.