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, index_DR
00008   ! ome  is the angular velocity \Omega, 
00009   ! ber  is the injection energy \epsilon, 
00010   ! radi is the radius of the star.
00011 
00012   !  the following are used for eccentricity reduction
00013   real(long)           ::  velx, delome, delvel
00014 end module def_matter_parameter

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