Cocal: /home/uryu/Cocal_svn_checkinout/Cocal/code/Analysis/Module/def_metric

00001 module def_metric_cartesian
00002   use phys_constant, only : long
00003   implicit none
00004   real(long), pointer  ::  alphca(:,:,:), psica(:,:,:)
00005   real(long), pointer  ::  bvxdca(:,:,:), bvydca(:,:,:), bvzdca(:,:,:)
00006   real(long), pointer  ::  bvxuca(:,:,:), bvyuca(:,:,:), bvzuca(:,:,:)
00007 end module def_metric_cartesian

/home/uryu/Cocal_svn_checkinout/Cocal/code/Analysis/Module/def_metric_cartesian.f90