Cocal: /home/uryu/Cocal_svn_checkinout/Cocal/code/Module_mpatch/coordinate_grav_r

00001 ! r_coordinate for the field
00002 !______________________________________________
00003 module coordinate_grav_r_mpt
00004   use phys_constant, only : nnrg, long, nnmpt
00005   implicit none
00006   real(long)  :: rg_(0:nnrg,nnmpt), rginv_(0:nnrg,nnmpt) ! radial grid points.
00007   real(long)  :: hrg_(nnrg,nnmpt), hrginv_(nnrg,nnmpt)   ! mid points.
00008   real(long)  :: drg_(nnrg,nnmpt), drginv_(nnrg,nnmpt)   ! intervals.
00009 end module coordinate_grav_r_mpt

/home/uryu/Cocal_svn_checkinout/Cocal/code/Module_mpatch/coordinate_grav_r_mpt.f90