subroutine, public cu_gf_driver_pre::cu_gf_driver_pre_run |
( |
logical, intent(in) |
flag_init, |
|
|
logical, intent(in) |
flag_restart, |
|
|
integer, intent(in) |
kdt, |
|
|
real(kind_phys), intent(in) |
fhour, |
|
|
real(kind_phys), intent(in) |
dtp, |
|
|
real(kind_phys), dimension(:,:), intent(in) |
t, |
|
|
real(kind_phys), dimension(:,:), intent(in) |
q, |
|
|
real(kind_phys), dimension(:,:), intent(in) |
prevst, |
|
|
real(kind_phys), dimension(:,:), intent(in) |
prevsq, |
|
|
real(kind_phys), dimension(:,:), intent(out) |
forcet, |
|
|
real(kind_phys), dimension(:,:), intent(out) |
forceq, |
|
|
integer, dimension(:), intent(out) |
cactiv, |
|
|
integer, dimension(:), intent(out) |
cactiv_m, |
|
|
real(kind_phys), dimension(:), intent(in) |
conv_act, |
|
|
real(kind_phys), dimension(:), intent(in) |
conv_act_m, |
|
|
character(len=*), intent(out) |
errmsg, |
|
|
integer, intent(out) |
errflg |
|
) |
| |