Lines Matching refs:divqi
64 & u3(npro), divqi(npro,nflow-1+isurf),
169 divqi = zero
177 divqi(:,1) = divqi(:,1) + shg(:,n,1)*ql(:,n,1 )
181 divqi(:,2) = divqi(:,2) + shg(:,n,1)*ql(:,n,2 )
185 divqi(:,3) = divqi(:,3) + shg(:,n,1)*ql(:,n,3 )
196 divqi(:,idflow+1) = divqi(:,idflow+1)
233 sforce(:,1) = -(1.0/weber(:)) * divqi(:,idflow+1) !x-direction
235 sforce(:,2) = -(1.0/weber(:)) * divqi(:,idflow+1) !y-direction
237 sforce(:,3) = -(1.0/weber(:)) * divqi(:,idflow+1) !z-direction
248 & rLui, src, divqi)
272 & tmp(:)*divqi(:,1)*divqi(:,1)
274 & tmp(:)*divqi(:,2)*divqi(:,2)
276 & tmp(:)*divqi(:,3)*divqi(:,3)
339 & divqi(npro)
456 divqi=zero ! until we reconstruct q_flow for scalar solve
460 & rLui, src, divqi)