subroutine __m_qbmm_fpp_f90__::s_mom_inv |
( |
type(scalar_field), dimension(:), intent(inout) | q_cons_vf, |
|
|
type(scalar_field), dimension(:), intent(inout) | q_prim_vf, |
|
|
type(scalar_field), dimension(:), intent(inout) | momsp, |
|
|
type(scalar_field), dimension(0:, 0:, :), intent(inout) | moms3d, |
|
|
real(kind(0d0)), dimension(startx:, starty:, startz:, 1:, 1:), intent(inout) | pb, |
|
|
real(kind(0d0)), dimension(startx:, starty:, startz:, 1:, 1:), intent(inout) | rhs_pb, |
|
|
real(kind(0d0)), dimension(startx:, starty:, startz:, 1:, 1:), intent(inout) | mv, |
|
|
real(kind(0d0)), dimension(startx:, starty:, startz:, 1:, 1:), intent(inout) | rhs_mv, |
|
|
type(int_bounds_info), intent(in) | ix, |
|
|
type(int_bounds_info), intent(in) | iy, |
|
|
type(int_bounds_info), intent(in) | iz, |
|
|
real(kind(0d0)), dimension(startx:, starty:, startz:) | nbub_sc ) |
|
private |