Index

Rundeck: P1SoM40

Created: Thu May 9 03:30:17 EDT 2024

reset_surf_fluxes

Module:

File: RAD_DRV.f

Summary: set incident solar and upward thermal fluxes appropriately as fractions change to conserve energy, prevent restart problems
Author : Gavin Schmidt
Version:

---

Declaration:

subroutine reset_surf_fluxes(i, j, itype_old, itype_new, ftype_orig, ftype_now)

Variables:

fsf : used from rad_com

trsurf : used from rad_com

itype_new : integer, intent(in)

indices for the old type turning to new type

itype_old : integer, intent(in)

indices for the old type turning to new type

ftype_now : real*8, intent(in)

original and current fracs of the 'new' type

ftype_orig : real*8, intent(in)

original and current fracs of the 'new' type

i : integer, intent(in)

j : integer, intent(in)

delf : real*8