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

Go to the documentation of this file.

module def_metric_excurve_grid
  use phys_constant, only : long
  implicit none
  real(long), pointer :: tfkij_grid(:,:,:,:,:), tfkijkij_grid(:,:,:)
  real(long), pointer :: trk_grid(:,:,:)
end module def_metric_excurve_grid

---