subroutine, public cu_gf_driver_pre::cu_gf_driver_pre_run |
( |
logical, intent(in) | flag_init, |
|
|
logical, intent(in) | flag_restart, |
|
|
logical, intent(in) | gf_coldstart, |
|
|
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, |
|
|
integer, intent(in) | ntsmoke, |
|
|
integer, intent(in) | ntdust, |
|
|
integer, intent(in) | ntcoarsepm, |
|
|
real(kind_phys), dimension(:,:,:), intent(inout), optional | chem3d, |
|
|
real(kind_phys), dimension(:,:,:), intent(inout) | gq0, |
|
|
character(len=*), intent(out) | errmsg, |
|
|
integer, intent(out) | errflg ) |