module common
  use, intrinsic ::  iso_fortran_env, only : real64, stdout => output_unit
  public
  integer, parameter :: dp = 8
end module common