# KIND

Inquiry Intrinsic Function (Generic): Returns the kind parameter of the argument.

result = KIND (x)

x | (Input) Can be of any intrinsic type.

## Results

The result is a scalar of type default integer. The result has a value equal to the kind type parameter value of x.

## Example

KIND (0.0) has the kind value of default real type.

KIND (12) has the kind value of default integer type.

The following shows another example:

    INTEGER i ! a 4-byte integer
    WRITE(*,*) KIND(i)
    CALL INTEGER2( )
    WRITE(*,*) KIND(i)  ! still a 4-byte integer
                        ! not affected by setting in subroutine
    END
    SUBROUTINE INTEGER2( )
      !DIR$INTEGER:2
      INTEGER j ! a 2-byte integer
      WRITE(*,*) KIND(j)
    END SUBROUTINE

Parent topic: J to L

## See Also

SELECTED_INT_KIND
SELECTED_REAL_KIND
CMPLX
INT
REAL
LOGICAL
CHAR
Intrinsic Data Types
Argument Keywords in Intrinsic Procedures