integer, public, parameter :: i4k = selected_int_kind (9) integer, public, parameter :: i8k = selected_int_kind (18) integer, public, parameter :: i_k = i4k integer, public, parameter :: r4k = selected_real_kind (6) integer, public, parameter :: r8k = selected_real_kind (12) integer, public, parameter :: r_k = r8k
i_k and r_k are the default kind types for integer and real.
Author: Matthias Lieber