module precision


  use iso_fortran_env, only: real32, real64, int32


  integer(int32), parameter :: ip = int32
  integer(ip), parameter :: sp = real32
  integer(ip), parameter :: dp = real64


end module precision
