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

00001 module def_matter_parameter
00002   use phys_constant, only : long
00003   implicit none
00004   real(long)           ::  pinx, emdc
00005   real(long)           ::  ome, ber, radi
00006   character(len=2)     ::  ROT_LAW
00007   real(long)           ::  A2DR, DRAT_A2DR, index_DR, index_DRq
00008   real(long)           ::  B2DR, DRAT_B2DR, index_DRp
00009 ! ome  is the angular velocity \Omega, 
00010 ! ber  is the injection energy \epsilon, 
00011 ! radi is the radius of the star.
00012 !
00013 !  the following are used for eccentricity reduction
00014   real(long)           ::  velx, delome, delvel
00015 end module def_matter_parameter

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