module definekind
   integer, parameter :: I4 = 4
   integer, parameter :: I8 = 8
   integer, parameter :: R4 = 4
   integer, parameter :: R8 = 8
   integer, parameter :: C4 = 4
   integer, parameter :: C8 = 8
end module definekind
