module typedef

  implicit none

  integer, parameter :: int32 = selected_int_kind(8)
  integer, parameter :: int64 = selected_int_kind(16)
  integer, parameter :: real64 = selected_real_kind(15)

end module typedef