module basetypes
  implicit none

  integer, parameter :: int_kind = selected_int_kind(10)

end module basetypes
