subroutine, public mp_thompson_pre::mp_thompson_pre_run |
( |
integer, intent(in) | ncol, |
|
|
integer, intent(in) | nlev, |
|
|
real(kind_phys), dimension(:,:), intent(in) | tgrs, |
|
|
real(kind_phys), dimension(:,:), intent(out) | tgrs_save, |
|
|
character(len=*), intent(out) | errmsg, |
|
|
integer, intent(out) | errflg ) |