Loading [MathJax]/extensions/tex2jax.js
CCPP SciDoc for UFS-SRW v3.0.0  SRW v3.0.0
Common Community Physics Package Developed at DTC
 
All Classes Namespaces Functions Variables Modules Pages
Loading...
Searching...
No Matches

◆ dcyc2t3_run()

subroutine, public dcyc2t3::dcyc2t3_run ( real(kind=kind_phys), intent(in) solhr,
real(kind=kind_phys), intent(in) slag,
real(kind=kind_phys), intent(in) sdec,
real(kind=kind_phys), intent(in) cdec,
real(kind=kind_phys), dimension(:), intent(in) sinlat,
real(kind=kind_phys), dimension(:), intent(in) coslat,
real(kind_phys), intent(in) con_g,
real(kind_phys), intent(in) con_cp,
real(kind_phys), intent(in) con_pi,
real(kind_phys), intent(in) con_sbc,
real(kind=kind_phys), dimension(:), intent(in) xlon,
real(kind=kind_phys), dimension(:), intent(in) coszen,
real(kind=kind_phys), dimension(:), intent(in) tsfc_lnd,
real(kind=kind_phys), dimension(:), intent(in) tsfc_ice,
real(kind=kind_phys), dimension(:), intent(in) tsfc_wat,
real(kind=kind_phys), dimension(:), intent(in) tf,
real(kind=kind_phys), dimension(:), intent(in) tsflw,
real(kind=kind_phys), dimension(:), intent(in) tsfc,
real(kind=kind_phys), dimension(:), intent(in) sfcemis_lnd,
real(kind=kind_phys), dimension(:), intent(in) sfcemis_ice,
real(kind=kind_phys), dimension(:), intent(in) sfcemis_wat,
real(kind=kind_phys), dimension(:), intent(in) sfcdsw,
real(kind=kind_phys), dimension(:), intent(in) sfcdswc,
real(kind=kind_phys), dimension(:), intent(in) sfcnsw,
real(kind=kind_phys), dimension(:), intent(in) sfcdlw,
real(kind=kind_phys), dimension(:,:), intent(in) swh,
real(kind=kind_phys), dimension(:,:), intent(in) swhc,
real(kind=kind_phys), dimension(:,:), intent(in) hlw,
real(kind=kind_phys), dimension(:,:), intent(in) hlwc,
real(kind=kind_phys), dimension(:), intent(in) sfcnirbmu,
real(kind=kind_phys), dimension(:), intent(in) sfcnirdfu,
real(kind=kind_phys), dimension(:), intent(in) sfcvisbmu,
real(kind=kind_phys), dimension(:), intent(in) sfcvisdfu,
real(kind=kind_phys), dimension(:), intent(in) sfcnirbmd,
real(kind=kind_phys), dimension(:), intent(in) sfcnirdfd,
real(kind=kind_phys), dimension(:), intent(in) sfcvisbmd,
real(kind=kind_phys), dimension(:), intent(in) sfcvisdfd,
integer, intent(in) im,
integer, intent(in) levs,
real(kind=kind_phys), intent(in) deltim,
real(kind=kind_phys), intent(in) fhswr,
logical, dimension(:), intent(in) dry,
logical, dimension(:), intent(in) icy,
logical, dimension(:), intent(in) wet,
logical, intent(in) damp_lw_fluxadj,
real(kind=kind_phys), intent(in) lfnc_k,
real(kind=kind_phys), intent(in) lfnc_p0,
logical, intent(in) use_lw_jacobian,
real(kind=kind_phys), dimension(:), intent(in) sfculw,
logical, intent(in) use_med_flux,
real(kind=kind_phys), dimension(:), intent(in), optional sfculw_med,
real(kind=kind_phys), dimension(:,:), intent(in), optional fluxlwup_jac,
real(kind=kind_phys), dimension(:,:), intent(in) t_lay,
real(kind=kind_phys), dimension(:,:), intent(in) p_lay,
real(kind=kind_phys), dimension(:,:), intent(in) p_lev,
real(kind=kind_phys), dimension(:,:), intent(in), optional flux2d_lwup,
real(kind=kind_phys), dimension(:,:), intent(in), optional flux2d_lwdown,
logical, intent(in) pert_radtend,
logical, intent(in) do_sppt,
logical, intent(in) ca_global,
real(kind=kind_phys), dimension(:), intent(in), optional tsfc_radtime,
real(kind=kind_phys), dimension(:,:), intent(inout) dtdt,
real(kind=kind_phys), dimension(:,:), intent(inout), optional dtdtnp,
real(kind=kind_phys), dimension(:,:), intent(inout), optional htrlw,
real(kind=kind_phys), dimension(:), intent(out) adjsfcdsw,
real(kind=kind_phys), dimension(:), intent(out) adjsfcdswc,
real(kind=kind_phys), dimension(:), intent(out) adjsfcnsw,
real(kind=kind_phys), dimension(:), intent(out) adjsfcdlw,
real(kind=kind_phys), dimension(:), intent(out) adjsfculw_lnd,
real(kind=kind_phys), dimension(:), intent(out) adjsfculw_ice,
real(kind=kind_phys), dimension(:), intent(out) adjsfculw_wat,
real(kind=kind_phys), dimension(:), intent(out) xmu,
real(kind=kind_phys), dimension(:), intent(out) xcosz,
real(kind=kind_phys), dimension(:), intent(out) adjnirbmu,
real(kind=kind_phys), dimension(:), intent(out) adjnirdfu,
real(kind=kind_phys), dimension(:), intent(out) adjvisbmu,
real(kind=kind_phys), dimension(:), intent(out) adjvisdfu,
real(kind=kind_phys), dimension(:), intent(out) adjnirbmd,
real(kind=kind_phys), dimension(:), intent(out) adjnirdfd,
real(kind=kind_phys), dimension(:), intent(out) adjvisbmd,
real(kind=kind_phys), dimension(:), intent(out) adjvisdfd,
character(len=*), intent(out) errmsg,
integer, intent(out) errflg )
  • LW time-step adjustment:
  • replace upward longwave flux provided by the mediator (zero over lakes)
  • normalize by average value over radiation period for daytime.
  • adjust sfc net and downward SW fluxes for zenith angle changes.