subroutine, public h2ophys::h2ophys_run |
( |
integer, intent(in) | im, |
|
|
integer, intent(in) | levs, |
|
|
integer, intent(in) | kh2o, |
|
|
real(kind=kind_phys), intent(in) | dt, |
|
|
real(kind=kind_phys), dimension(:,:), intent(inout) | h2o, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | ph2o, |
|
|
real(kind=kind_phys), dimension(:,:), intent(in) | prsl, |
|
|
real(kind=kind_phys), dimension(:,:,:), intent(in) | h2opltc, |
|
|
integer, intent(in) | h2o_coeff, |
|
|
integer, intent(in) | me, |
|
|
character(len=*), intent(out) | errmsg, |
|
|
integer, intent(out) | errflg ) |