subroutine, public gfs_surface_generic_post::gfs_surface_generic_post_run |
( |
integer, intent(in) | im, |
|
|
logical, intent(in) | cplflx, |
|
|
logical, intent(in) | cplaqm, |
|
|
logical, intent(in) | cplchm, |
|
|
logical, intent(in) | cplwav, |
|
|
logical, intent(in) | cpllnd, |
|
|
logical, intent(in) | cpl_fire, |
|
|
logical, intent(in) | lssav, |
|
|
logical, dimension(:), intent(in) | dry, |
|
|
logical, dimension(:), intent(in) | icy, |
|
|
logical, dimension(:), intent(in) | wet, |
|
|
integer, intent(in) | lsm, |
|
|
integer, intent(in) | lsm_noahmp, |
|
|
real(kind=kind_phys), intent(in) | dtf, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | ep1d, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | gflx, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | tgrs_1, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | qgrs_1, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | ugrs_1, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | vgrs_1, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | adjsfcdlw, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | adjsfcdsw, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | adjnirbmd, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | adjnirdfd, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | adjvisbmd, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | adjvisdfd, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | adjsfculw, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | adjsfculw_wat, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | adjnirbmu, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | adjnirdfu, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | adjvisbmu, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | adjvisdfu, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | t2m, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | q2m, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | u10m, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | v10m, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | tsfc, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | tsfc_wat, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | pgr, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | xcosz, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | evbs, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | evcw, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | trans, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | sbsno, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | snowc, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | snohf, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | pah, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | pahi, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) | epi, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) | gfluxi, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) | t1, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) | q1, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) | u1, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) | v1, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | dlwsfci_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | dswsfci_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | dlwsfc_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | dswsfc_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | dnirbmi_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | dnirdfi_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | dvisbmi_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | dvisdfi_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | dnirbm_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | dnirdf_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | dvisbm_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | dvisdf_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | nlwsfci_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | nlwsfc_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | t2mi_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | q2mi_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | u10mi_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | v10mi_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | tsfci_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | psurfi_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | nnirbmi_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | nnirdfi_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | nvisbmi_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | nvisdfi_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | nswsfci_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | nswsfc_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | nnirbm_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | nnirdf_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | nvisbm_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | nvisdf_cpl, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) | gflux, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) | evbsa, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) | evcwa, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) | transa, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) | sbsnoa, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) | snowca, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) | snohfa, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | paha, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) | ep, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | ecan, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | etran, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | edir, |
|
|
real(kind=kind_phys), dimension(:), intent(in), optional | waxy, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) | runoff, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) | srunoff, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | runof, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | drain, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) | tecan, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) | tetran, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) | tedir, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | twa, |
|
|
logical, intent(in) | lheatstrg, |
|
|
real(kind=kind_phys), intent(in) | h0facu, |
|
|
real(kind=kind_phys), intent(in) | h0facs, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | zvfun, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | hflx, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | evap, |
|
|
real(kind=kind_phys), dimension(:), intent(out) | hflxq, |
|
|
real(kind=kind_phys), dimension(:), intent(out) | hffac, |
|
|
integer, intent(in) | isot, |
|
|
integer, intent(in) | ivegsrc, |
|
|
integer, dimension(:), intent(in) | islmsk, |
|
|
integer, dimension(:), intent(out) | vtype, |
|
|
integer, dimension(:), intent(out) | stype, |
|
|
integer, dimension(:), intent(out) | scolor, |
|
|
integer, dimension(:), intent(out) | slope, |
|
|
integer, dimension(:), intent(in) | vtype_save, |
|
|
integer, dimension(:), intent(in) | stype_save, |
|
|
integer, dimension(:), intent(in) | scolor_save, |
|
|
integer, dimension(:), intent(in) | slope_save, |
|
|
character(len=*), intent(out) | errmsg, |
|
|
integer, intent(out) | errflg ) |