Logical KIND Selection

• There is no SELECTED_LOGICAL_KIND intrinsic, however, the KIND intrinsic can be used as normal.

  For example,

    LOGICAL(KIND=4) :: yorn = .TRUE._4
    LOGICAL(KIND=1), DIMENSION(10) :: mask
    IF (yorn .EQ. LOGICAL(mask(1),KIND(yorn)))...

• KIND=1 may only use one byte of store per variable,

  

• Must refer to the compiler manual.

For more information, click here