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

00001 !  phi_coordinate
00002 !______________________________________________
00003 module coordinate_grav_phi_mpt
00004   use phys_constant,  only : pi, nnpg, long, nnmpt
00005   use grid_parameter, only : npg
00006   implicit none
00007   Real(long) :: dphig_(nnmpt), dphiginv_(nnmpt)  
00008   Real(long) :: phig_(0:nnpg,nnmpt), hphig_(nnpg,nnmpt)
00009 ! Subroutine
00010 end module coordinate_grav_phi_mpt

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