module mod_parameters
real, parameter :: onem=9806.
real, parameter :: onecm=onem/100.
real, parameter :: undef=-1e14
real, parameter :: huge=2.0**100
real, parameter :: radian =57.2957795
real, parameter :: pi     =3.1415926536
end module mod_parameters