Cocal: /home/uryu/Cocal_svn_checkinout/Cocal/code/Module/def_bh

00001 module def_bh_parameter
00002   use phys_constant, only : long
00003   implicit none
00004   real(long) ::  ome_bh, spin_bh
00005   real(long) ::  alph_bh, psi_bh
00006   real(long) ::  th_spin_bh_deg, phi_spin_bh_deg
00007   real(long) ::  th_spin_bh, phi_spin_bh
00008   real(long) ::  rgin_deform, mass_pBH
00009   real(long) ::  mom_pBH(3), spin_pBH(3)
00010   real(long) ::  m_kerr, a_kerr
00011   character(2) ::  bh_bctype, bh_sptype, bh_soltype
00012   ! ome_bh  is the angular velocity \Omega, 
00013   ! spin_bh is the spin angular velocity \Omega
00014 end module def_bh_parameter

/home/uryu/Cocal_svn_checkinout/Cocal/code/Module/def_bh_parameter.f90