/home/uryu/Cocal_svn_checkinout/Cocal/code/Module_interface/interface_compute_shift.f90
Go to the documentation of this file.00001 module interface_compute_shift 00002 implicit none 00003 interface 00004 subroutine compute_shift(potx,poty,potz,gvec,bfnc) 00005 real(8), pointer :: bfnc(:,:,:) 00006 real(8), pointer :: gvec(:,:,:,:) 00007 real(8), pointer :: potx(:,:,:), poty(:,:,:), potz(:,:,:) 00008 end subroutine compute_shift 00009 end interface 00010 end module interface_compute_shift
