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