/home/uryu/Cocal_svn_checkinout/Cocal/code/Module_mpatch/grid_points_asymptotic_patch_mpt.f90
Go to the documentation of this file.00001 module grid_points_asymptotic_patch_mpt 00002 use phys_constant, only : long 00003 implicit none 00004 ! 00005 real(long), pointer :: ra_(:,:,:,:), tha_(:,:,:,:), phia_(:,:,:,:) 00006 real(long), pointer :: hra_(:,:,:,:), htha_(:,:,:,:), hphia_(:,:,:,:) 00007 00008 end module grid_points_asymptotic_patch_mpt
