Skip to content

Commit c00c2da

Browse files
committed
Removing redundant zeroing of litter fluxes in patch creation.
1 parent 57cf6c5 commit c00c2da

File tree

1 file changed

+1
-7
lines changed

1 file changed

+1
-7
lines changed

biogeochem/EDPatchDynamicsMod.F90

Lines changed: 1 addition & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -945,13 +945,7 @@ subroutine create_patch(currentSite, new_patch, age, areap, spread_local,cwd_ag_
945945
new_patch%frac_burnt = 0._r8
946946
new_patch%total_tree_area = 0.0_r8
947947
new_patch%NCL_p = 1
948-
949-
new_patch%leaf_litter_in(:) = 0._r8
950-
new_patch%leaf_litter_out(:) = 0._r8
951-
952-
new_patch%root_litter_in(:) = 0._r8
953-
new_patch%root_litter_out(:) = 0._r8
954-
948+
955949
end subroutine create_patch
956950

957951
! ============================================================================

0 commit comments

Comments
 (0)