Index

Rundeck: P1SoM40

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

updsur

Module: SURF_ALBEDO

File: ALBEDO.f

Summary: UPDSUR updates variables for surface albedo once a day
Author : A. Lacis/V. Oinas (modifications by I. Aleinov/G. Schmidt)
Version:

---

Declaration:

subroutine updsur(jyearr, jjdayr)

Variables:

jyearr : integer, intent(in)

radiation year (not used for anything yet)

jjdayr : integer, intent(in)

julian day (used for seasonality of veg albedo)

k : integer

ks1 : integer

ks2 : integer

kn1 : integer

kn2 : integer

l : integer

xjday : real*8

seasn1 : real*8

seasn2 : real*8

wt2 : real*8

wt1 : real*8