Go to the source code of this file.
Functions/Subroutines | |
subroutine | ggair_sp_2b (g2up, g2dn, gvup, gvdn, vxup, vxdn, vcup, vcdn, dxdgu2, dxdgd2, dxdgud, dcdgu2, dcdgd2, dcdgud) |
subroutine ggair_sp_2b | ( | real(8), dimension(ngtot), intent(in) | g2up, |
real(8), dimension(ngtot), intent(in) | g2dn, | ||
real(8), dimension(ngtot,3), intent(in) | gvup, | ||
real(8), dimension(ngtot,3), intent(in) | gvdn, | ||
real(8), dimension(ngtot), intent(inout) | vxup, | ||
real(8), dimension(ngtot), intent(inout) | vxdn, | ||
real(8), dimension(ngtot), intent(inout) | vcup, | ||
real(8), dimension(ngtot), intent(inout) | vcdn, | ||
real(8), dimension(ngtot), intent(in) | dxdgu2, | ||
real(8), dimension(ngtot), intent(in) | dxdgd2, | ||
real(8), dimension(ngtot), intent(in) | dxdgud, | ||
real(8), dimension(ngtot), intent(in) | dcdgu2, | ||
real(8), dimension(ngtot), intent(in) | dcdgd2, | ||
real(8), dimension(ngtot), intent(in) | dcdgud | ||
) |
Definition at line 9 of file ggair_sp_2b.f90.