We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent a5f5a3b commit 4d3b7d4Copy full SHA for 4d3b7d4
main/FatesInterfaceMod.F90
@@ -976,11 +976,7 @@ subroutine SetFatesGlobalElements2(use_fates)
976
! Identify number of size and age class bins for history output
977
! assume these arrays are 1-indexed
978
nlevage = size(ED_val_history_ageclass_bin_edges,dim=1)
979
- if (hlm_use_edge_forest == itrue) then
980
- nlevedgeforest = size(ED_val_edgeforest_bin_edges,dim=1)
981
- else
982
- nlevedgeforest = 1
983
- end if
+ nlevedgeforest = size(ED_val_edgeforest_bin_edges,dim=1)
984
nlevheight = size(ED_val_history_height_bin_edges,dim=1)
985
nlevcoage = size(ED_val_history_coageclass_bin_edges,dim=1)
986
nlevdamage = size(ED_val_history_damage_bin_edges, dim=1)
0 commit comments