TstatusFlux Derived Type

type, public :: TstatusFlux

states


Components

Type Visibility Attributes Name Initial
real(kind=r8), public, pointer :: wh(:,:)
real(kind=r8), public, pointer :: dwh(:,:)
real(kind=r8), public, pointer :: yh(:,:)
real(kind=r8), public, pointer :: wsat(:,:)
real(kind=r8), public, pointer :: wunsat(:,:)
real(kind=r8), public, pointer :: qhorton(:,:)
real(kind=r8), public, pointer :: qdunne(:,:)
real(kind=r8), public, pointer :: qsur(:,:)
real(kind=r8), public, pointer :: qsub(:,:)
real(kind=r8), public, pointer :: qgwl(:,:)

fluxes
real(kind=r8), public, pointer :: ehout(:,:)
real(kind=r8), public, pointer :: asat(:,:)
real(kind=r8), public, pointer :: esat(:,:)

states
real(kind=r8), public, pointer :: tarea(:,:)
real(kind=r8), public, pointer :: wt(:,:)
real(kind=r8), public, pointer :: dwt(:,:)
real(kind=r8), public, pointer :: yt(:,:)
real(kind=r8), public, pointer :: mt(:,:)
real(kind=r8), public, pointer :: rt(:,:)
real(kind=r8), public, pointer :: pt(:,:)
real(kind=r8), public, pointer :: vt(:,:)
real(kind=r8), public, pointer :: tt(:,:)

fluxes
real(kind=r8), public, pointer :: tevap(:,:)
real(kind=r8), public, pointer :: etin(:,:)
real(kind=r8), public, pointer :: etout(:,:)

states
real(kind=r8), public, pointer :: rarea(:,:)
real(kind=r8), public, pointer :: wr(:,:)
real(kind=r8), public, pointer :: dwr(:,:)
real(kind=r8), public, pointer :: yr(:,:)
real(kind=r8), public, pointer :: mr(:,:)
real(kind=r8), public, pointer :: rr(:,:)
real(kind=r8), public, pointer :: pr(:,:)
real(kind=r8), public, pointer :: vr(:,:)
real(kind=r8), public, pointer :: tr(:,:)

exchange fluxes
real(kind=r8), public, pointer :: erlg(:,:)
real(kind=r8), public, pointer :: erlateral(:,:)
real(kind=r8), public, pointer :: erin(:,:)
real(kind=r8), public, pointer :: erout(:,:)
real(kind=r8), public, pointer :: erout_prev(:,:)
real(kind=r8), public, pointer :: eroutUp(:,:)
real(kind=r8), public, pointer :: eroutUp_avg(:,:)
real(kind=r8), public, pointer :: erlat_avg(:,:)
real(kind=r8), public, pointer :: flow(:,:)
real(kind=r8), public, pointer :: erin1(:,:)
real(kind=r8), public, pointer :: erin2(:,:)
real(kind=r8), public, pointer :: ergwl(:,:)

for Runge-Kutta algorithm
real(kind=r8), public, pointer :: wrtemp(:,:)
real(kind=r8), public, pointer :: erintemp(:,:)
real(kind=r8), public, pointer :: erouttemp(:,:)
real(kind=r8), public, pointer :: k1(:,:)
real(kind=r8), public, pointer :: k2(:,:)
real(kind=r8), public, pointer :: k3(:,:)
real(kind=r8), public, pointer :: k4(:,:)