| subroutine, public gfs_surface_composites_pre::gfs_surface_composites_pre_run | ( | integer, intent(in) | im, |
| integer, intent(in) | lkm, | ||
| logical, intent(in) | frac_grid, | ||
| integer, intent(in) | iopt_lake, | ||
| integer, intent(in) | iopt_lake_clm, | ||
| logical, dimension(:), intent(inout) | flag_cice, | ||
| logical, intent(in) | cplflx, | ||
| logical, intent(in) | cplice, | ||
| logical, intent(in) | cplwav2atm, | ||
| integer, intent(in) | lsm, | ||
| integer, intent(in) | lsm_ruc, | ||
| real(kind=kind_phys), dimension(:), intent(in) | landfrac, | ||
| real(kind=kind_phys), dimension(:), intent(in) | lakefrac, | ||
| real(kind=kind_phys), dimension(:), intent(in) | lakedepth, | ||
| real(kind=kind_phys), dimension(:), intent(in) | oceanfrac, | ||
| real(kind=kind_phys), dimension(:), intent(out) | frland, | ||
| logical, dimension(:), intent(inout) | dry, | ||
| logical, dimension(:), intent(inout) | icy, | ||
| logical, dimension(:), intent(inout) | lake, | ||
| integer, dimension(:), intent(in) | use_lake_model, | ||
| logical, dimension(:), intent(inout) | wet, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | hice, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | cice, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | zorlo, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | zorll, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | zorli, | ||
| real(kind=kind_phys), dimension(:), intent(in) | snowd, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | snowd_lnd, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | snowd_ice, | ||
| real(kind=kind_phys), dimension(:), intent(in) | tprcp, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | tprcp_wat, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | tgrs1, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | tprcp_lnd, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | tprcp_ice, | ||
| real(kind=kind_phys), dimension(:), intent(in) | uustar, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | uustar_wat, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | uustar_lnd, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | uustar_ice, | ||
| real(kind=kind_phys), dimension(:), intent(in) | weasd, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | weasd_lnd, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | weasd_ice, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | ep1d_ice, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | tsfc, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | tsfco, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | tsfcl, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | tsfc_wat, | ||
| real(kind=kind_phys), dimension(:), intent(in) | tisfc, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | tsurf_wat, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | tsurf_lnd, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | tsurf_ice, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | gflx_ice, | ||
| real(kind=kind_phys), intent(in) | tgice, | ||
| integer, dimension(:), intent(inout) | islmsk, | ||
| integer, dimension(:), intent(inout) | islmsk_cice, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | slmsk, | ||
| real(kind=kind_phys), dimension(:), intent(in) | qss, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | qss_wat, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | qss_lnd, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | qss_ice, | ||
| real(kind=kind_phys), intent(in) | min_lakeice, | ||
| real(kind=kind_phys), intent(in) | min_seaice, | ||
| integer, intent(in) | kdt, | ||
| real(kind=kind_phys), intent(in) | huge, | ||
| character(len=*), intent(out) | errmsg, | ||
| integer, intent(out) | errflg ) |