subroutine module_mp_nssl_2mom::qvexcess |
( |
integer | ngs, |
|
|
integer | mgs, |
|
|
real, dimension(mgs) | qwvp0, |
|
|
real, dimension(ngs) | qv0, |
|
|
real, dimension(ngscnt) | qcw1, |
|
|
real, dimension(ngs) | pres, |
|
|
real, dimension(ngs) | thetap0, |
|
|
real, dimension(ngs) | theta0, |
|
|
real | qvex, |
|
|
real, dimension(ngs) | pi0, |
|
|
real, dimension(nqsat) | tabqvs, |
|
|
integer | nqsat, |
|
|
real | fqsat, |
|
|
real | cbw, |
|
|
real, dimension(ngs) | fcqv1, |
|
|
real, dimension(ngs) | felvcp, |
|
|
real | ss1, |
|
|
real, dimension(ngs) | pk, |
|
|
integer | ngscnt ) |
|
private |