flxsice.F90: real(r8), intent(in) :: srfrad(plond) ! Solar absorbed plus down longwave flux comsrf.F90: real(r8), allocatable:: srfrad(:,:) ! surface net radiative flux tphysbc.F: real(r8) srfrad(plond) ! Net surface radiative flux (watts/m**2) srfsice.F90: real(r8), intent(in) :: srfrad(plond) ! Srf solar abs flux plus down longwave tphysbc.F: srfrad(i) = fsns(i) + flwds(i) srfxfer.F: netsw(i,lat) = srfrad(i,lat) - flwds(i,lat) flxsice.F90: fnt(i) = srfrad(i) - lwup(i) - shf(i) - lhf(i) buffer.F90: real(r8), allocatable :: fsns(:,:) ! surface absorbed solar flux tphysbc.F: real(r8) fsns(plond) ! Surface solar absorbed flux my_linemsbc.F90:real(r8), intent(inout) :: flwds(plond) ! surface longwave down flux lsm_ccmintr.F: real(r8) flwdsxy(londim,beglat:endlat)! downward longwave rad onto surface (w/m**2) comsrf.F90: real(r8), allocatable:: flwds(:,:) ! downward longwave radiation at surface flxsice.F90: real(r8), intent(out):: fnt(plond) ! Net surface flux for input conditions (W/m2) flxoce.F90: real(r8), intent(out):: lwup(plond) ! Longwave up flux at surface (W/m2) lsmini.F: real(r8) lwupxy (londim,beglatatm:endlatatm) ! emitted longwave radiation (w/m**2) comsrf.F90: real(r8), allocatable:: shf(:,:) ! sensible heat flux flxoce.F90: real(r8), intent(out):: shf(plond) ! Initial sensible heat flux (W/m2) comsrf.F90: real(r8), allocatable:: lhf(:,:) ! latent heat flux flxsice.F90: real(r8), intent(out):: lhf(plond) ! Initial latent heat flux (W/m2)