/home/uryu/Cocal_svn_checkinout/Cocal/code/Module_mpatch/grid_points_binary_in_asympto_mpt.f90
Go to the documentation of this file.00001 module grid_points_binary_in_asympto_mpt 00002 use phys_constant, only : long 00003 implicit none 00004 ! 00005 real(long), pointer :: rb_a_(:,:,:,:), thb_a_(:,:,:,:), phib_a_(:,:,:,:) 00006 real(long), pointer :: hrb_a_(:,:,:,:), hthb_a_(:,:,:,:), hphib_a_(:,:,:,:) 00007 ! 00008 end module grid_points_binary_in_asympto_mpt
