/home/uryu/Cocal_svn_checkinout/Cocal/code/Module/phys_constant.f90 File Reference

Go to the source code of this file.

Modules
module	phys_constant
Variables
Integer, parameter	phys_constant::long = SELECTED_REAL_KIND(15
real(long), parameter	phys_constant::pi = 3.141592653589793d+0
real(long), parameter	phys_constant::g = 6.67428d-08
real(long), parameter	phys_constant::c = 2.99792458d+10
real(long), parameter	phys_constant::msol = 1.98892d+33
real(long), parameter	phys_constant::solmas = 1.98892d+33
real(long), parameter	phys_constant::mag_mu0 = 4.0d0*pi*1.0d-02
real(long), parameter	phys_constant::fpieps0 = 4.0d0*pi/(mag_mu0*c**2)
real(long), parameter	phys_constant::Gauss = 2.355368504154456d+19
real(long), parameter	phys_constant::statV = 2.355368504154456d+19
integer, parameter	phys_constant::nnrg = 780
integer, parameter	phys_constant::nntg = 390
integer, parameter	phys_constant::nnpg = 390
integer, parameter	phys_constant::nnlg = 60
integer, parameter	phys_constant::nnrf = 780
integer, parameter	phys_constant::nntf = 390
integer, parameter	phys_constant::nnpf = 390
integer, parameter	phys_constant::nnlf = 60
integer, parameter	phys_constant::nnpeos = 10
integer, parameter	phys_constant::nnqeos = 10
integer, parameter	phys_constant::nnteos = 10000
integer, parameter	phys_constant::nnmpt = 5
integer, parameter	phys_constant::nmpt = 3