Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

removing large 3D radiation arrays from restarts #428

Merged
merged 7 commits into from
Nov 6, 2018
Merged

removing large 3D radiation arrays from restarts #428

Show file tree
Hide file tree
Changes from 2 commits
Commits
Show all changes
7 commits
Select commit Hold shift + click to select a range
ba1a087
Added a wrapper call to norman radiation, which allows us to re-build…
rgknox Oct 17, 2018
44f66d6
Small bugfix initializing output absorption fraction arrays
rgknox Oct 26, 2018
dd41af4
changed zenith flag to logical
rgknox Oct 26, 2018
5d0148f
Reverting some precisions to original to attempt closer b4b results.
rgknox Nov 2, 2018
3440cfb
Updated precision on constants in norman radiation routine.
rgknox Nov 4, 2018
e0495bb
updated naming suffix for band indices in restart -> _ib
rgknox Nov 4, 2018
1f0db48
Removed references ti nlevleaf and nclmax in the restart code
rgknox Nov 4, 2018
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
8 changes: 8 additions & 0 deletions biogeochem/EDPatchDynamicsMod.F90
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -1316,6 +1316,8 @@ subroutine create_patch(currentSite, new_patch, age, areap,cwd_ag_local,cwd_bg_l
new_patch%frac_burnt = 0._r8
new_patch%total_tree_area = 0.0_r8
new_patch%NCL_p = 1



end subroutine create_patch

Expand Down Expand Up @@ -1440,6 +1442,12 @@ subroutine zero_patch(cp_p)
currentPatch%c_stomata = 0.0_r8 ! This is calculated immediately before use
currentPatch%c_lblayer = 0.0_r8

currentPatch%solar_zenith_flag = -1
currentPatch%solar_zenith_angle = nan

currentPatch%gnd_alb_dir(:) = nan
currentPatch%gnd_alb_dif(:) = nan

end subroutine zero_patch

! ============================================================================
Expand Down
Loading