| subroutine cnvc90::cnvc90_run | ( | real(kind=kind_phys), intent(in) | clstp, |
| integer, intent(in) | im, | ||
| real(kind=kind_phys), dimension(:), intent(in) | rn, | ||
| integer, dimension(:), intent(in) | kbot, | ||
| integer, dimension(:), intent(in) | ktop, | ||
| integer, intent(in) | km, | ||
| real(kind=kind_phys), dimension(:,:), intent(in) | prsi, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | acv, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | acvb, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | acvt, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | cv, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | cvb, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | cvt, | ||
| character(len=*), intent(out) | errmsg, | ||
| integer, intent(out) | errflg ) |