mod_parameter.f90

Go to the documentation of this file.

module mod_parameter

  use itm_types

  implicit none

  real(r8), parameter :: pi = 3.1415926535897932_r8
  real(r8), parameter :: twopi = 2._r8 * pi
  real(r8), parameter :: mu0 = 4._r8 * pi * 1.e-7_r8

end module mod_parameter