Cocal: /home/uryu/Cocal_svn_checkinout/Cocal/code/Module/def

00001 module def_metric
00002   use phys_constant, only : long
00003   implicit none
00004   real(long), pointer  ::  alph(:,:,:), psi(:,:,:), alps(:,:,:)
00005   real(long), pointer  ::  alps2(:,:,:)
00006   real(long), pointer  ::  bvxd(:,:,:), bvyd(:,:,:), bvzd(:,:,:)
00007   real(long), pointer  ::  bvxu(:,:,:), bvyu(:,:,:), bvzu(:,:,:)
00008   real(long), pointer  ::  tfkij(:,:,:,:,:), tfkijkij(:,:,:), trk(:,:,:)
00009 end module def_metric

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