Skip to content

Commit

Permalink
Merge branch 'staging' of https://github.com/USDAForestService/Forest…
Browse files Browse the repository at this point in the history 
…VegetationSimulator into open-main
  • Loading branch information
@wagnerds
wagnerds committed May 1, 2024
2 parents 2beb1ef + 6e92191 commit 87d22b3
Show file tree
Hide file tree
Showing 207 changed files with 4,445 additions and 68,314 deletions.
3 changes: 3 additions & 0 deletions .gitmodules
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
[submodule "volume/NVEL"]
path = volume/NVEL
url = https://github.com/FMSC-Measurements/VolumeLibrary
8 changes: 4 additions & 4 deletions ak/bratio.f
View file
Original file line number Diff line number Diff line change
Expand Up @@ -13,14 +13,14 @@ FUNCTION BRATIO(IS,D,H)
C 3 YC Alaska cedar 042 CANO9 Callitropsis nootkatensis
C 4 TA tamarack 071 LALA Larix laricina
C 5 WS white spruce 094 PIGL Picea glauca
C 6 LS Lutz’s spruce PILU Picea lutzii
C 6 LS Lutz�s spruce PILU Picea lutzii
C 7 BE black spruce 095 PIMA Picea mariana
C 8 SS Sitka spruce 098 PISI Picea sitchensis
C 9 LP lodgepole pine 108 PICO Pinus contorta
C 10 RC western redcedar 242 THPL Thuja plicata
C 11 WH western hemlock 263 TSHE Tsuga heterophylla
C 12 MH mountain hemlock 264 TSME Tsuga mertensiana
C 13 OS other softwoods 298 2TE
C 13 OS other softwoods 298 2TN
C 14 AD alder species 350 ALNUS Alnus species
C 15 RA red alder 351 ALRU2 Alnus rubra
C 16 PB paper birch 375 BEPA Betula papyrifera
Expand All @@ -29,8 +29,8 @@ FUNCTION BRATIO(IS,D,H)
C 19 AS quaking aspen 746 POTR5 Populus tremuloides
C 20 CW black cottonwood 747 POBAT Populus trichocarpa
C 21 WI willow species 920 SALIX Salix species
C 22 SU Scouler’s willow 928 SASC Salix scouleriana
C 23 OH other hardwoods 998 2TD
C 22 SU Scouler�s willow 928 SASC Salix scouleriana
C 23 OH other hardwoods 998 2TB
C
C----------
C VARIABLE DECLARATIONS:
Expand Down
12 changes: 6 additions & 6 deletions ak/dgf.f
View file
Original file line number Diff line number Diff line change
Expand Up @@ -59,7 +59,7 @@ SUBROUTINE DGF(DIAM)
C DGLNSI -- ARRAY, COEFFICIENTS FOR THE LOG(SITE
C INDEX) TERM IN THE DIAMETER GROWTH EQUATION
C DGRD -- ARRAY, COEFFICIENTS FOR POINT RELATIVE DENSITY
C (PLOT ZEIDE SDI / PLOT MAX SDI – DECIMAL)
C (PLOT ZEIDE SDI / PLOT MAX SDI � DECIMAL)
C DGSASP -- ARRAY, COEFFICIENT FOR SLOPE*COS(ASPECT) TERM
C DGSLOP -- ARRAY, COEFFICIENT FOR SLOPE PERCENT TERM
C OBSERV -- CONTAINS THE NUMBER OF OBSERVATIONS BY SPECIES FOR THE
Expand Down Expand Up @@ -88,14 +88,14 @@ SUBROUTINE DGF(DIAM)
C 3 YC Alaska cedar 042 CANO9 Callitropsis nootkatensis
C 4 P TA tamarack 071 LALA Larix laricina
C 5 P WS white spruce 094 PIGL Picea glauca
C 6 P LS Lutz’s spruce PILU Picea lutzii
C 6 P LS Lutz�s spruce PILU Picea lutzii
C 7 P BE black spruce 095 PIMA Picea mariana
C 8 SS Sitka spruce 098 PISI Picea sitchensis
C 9 LP lodgepole pine 108 PICO Pinus contorta
C 10 RC western redcedar 242 THPL Thuja plicata
C 11 WH western hemlock 263 TSHE Tsuga heterophylla
C 12 MH mountain hemlock 264 TSME Tsuga mertensiana
C 13 P OS other softwoods 298 2TE
C 13 P OS other softwoods 298 2TN
C 14 AD alder species 350 ALNUS Alnus species
C 15 RA red alder 351 ALRU2 Alnus rubra
C 16 P PB paper birch 375 BEPA Betula papyrifera
Expand All @@ -104,8 +104,8 @@ SUBROUTINE DGF(DIAM)
C 19 P AS quaking aspen 746 POTR5 Populus tremuloides
C 20 P CW black cottonwood 747 POBAT Populus trichocarpa
C 21 P WI willow species 920 SALIX Salix species
C 22 P SU Scouler’s willow 928 SASC Salix scouleriana
C 23 P OH other hardwoods 998 2TD
C 22 P SU Scouler�s willow 928 SASC Salix scouleriana
C 23 P OH other hardwoods 998 2TB
C----------
C VARIABLE DECLARATIONS:
C----------
Expand Down Expand Up @@ -342,7 +342,7 @@ SUBROUTINE DGF(DIAM)
C ADI = Annual diameter increment (in year-1)
C DBH = Diameter at breast height (in)
C PBAL = Plot level basal area in larger trees (ft2 * acre-1)
C PRD = Plot Relative density (plot Zeide SDI / plot Max SDI – decimal)
C PRD = Plot Relative density (plot Zeide SDI / plot Max SDI � decimal)
C CR = Crown ratio (%)
C ELEV = Elevation of plot (ft)
C SLOPE = Slope of plot (%)
Expand Down
8 changes: 4 additions & 4 deletions ak/dubscr.f
View file
Original file line number Diff line number Diff line change
Expand Up @@ -57,14 +57,14 @@ SUBROUTINE DUBSCR(ISPC,D,H,PRD,QMDPLT,CR)
C 3 YC Alaska cedar 042 CANO9 Callitropsis nootkatensis
C 4 TA tamarack 071 LALA Larix laricina
C 5 WS white spruce 094 PIGL Picea glauca
C 6 LS Lutz’s spruce PILU Picea lutzii
C 6 LS Lutz�s spruce PILU Picea lutzii
C 7 BE black spruce 095 PIMA Picea mariana
C 8 SS Sitka spruce 098 PISI Picea sitchensis
C 9 LP lodgepole pine 108 PICO Pinus contorta
C 10 RC western redcedar 242 THPL Thuja plicata
C 11 WH western hemlock 263 TSHE Tsuga heterophylla
C 12 MH mountain hemlock 264 TSME Tsuga mertensiana
C 13 OS other softwoods 298 2TE
C 13 OS other softwoods 298 2TN
C 14 AD alder species 350 ALNUS Alnus species
C 15 RA red alder 351 ALRU2 Alnus rubra
C 16 PB paper birch 375 BEPA Betula papyrifera
Expand All @@ -73,8 +73,8 @@ SUBROUTINE DUBSCR(ISPC,D,H,PRD,QMDPLT,CR)
C 19 AS quaking aspen 746 POTR5 Populus tremuloides
C 20 CW black cottonwood 747 POBAT Populus trichocarpa
C 21 WI willow species 920 SALIX Salix species
C 22 SU Scouler’s willow 928 SASC Salix scouleriana
C 23 OH other hardwoods 998 2TD
C 22 SU Scouler�s willow 928 SASC Salix scouleriana
C 23 OH other hardwoods 998 2TB
C
C----------
C
Expand Down
8 changes: 4 additions & 4 deletions ak/esadvh.f
View file
Original file line number Diff line number Diff line change
Expand Up @@ -36,14 +36,14 @@ SUBROUTINE ESADVH (I,HHT,DELAY,GENTIM,TRAGE,JOSTND,DEBUG)
C 3 YC Alaska cedar 042 CANO9 Callitropsis nootkatensis
C 4 TA tamarack 071 LALA Larix laricina
C 5 WS white spruce 094 PIGL Picea glauca
C 6 LS Lutz’s spruce PILU Picea lutzii
C 6 LS Lutz�s spruce PILU Picea lutzii
C 7 BE black spruce 095 PIMA Picea mariana
C 8 SS Sitka spruce 098 PISI Picea sitchensis
C 9 LP lodgepole pine 108 PICO Pinus contorta
C 10 RC western redcedar 242 THPL Thuja plicata
C 11 WH western hemlock 263 TSHE Tsuga heterophylla
C 12 MH mountain hemlock 264 TSME Tsuga mertensiana
C 13 OS other softwoods 298 2TE
C 13 OS other softwoods 298 2TN
C 14 AD alder species 350 ALNUS Alnus species
C 15 RA red alder 351 ALRU2 Alnus rubra
C 16 PB paper birch 375 BEPA Betula papyrifera
Expand All @@ -52,8 +52,8 @@ SUBROUTINE ESADVH (I,HHT,DELAY,GENTIM,TRAGE,JOSTND,DEBUG)
C 19 AS quaking aspen 746 POTR5 Populus tremuloides
C 20 CW black cottonwood 747 POBAT Populus trichocarpa
C 21 WI willow species 920 SALIX Salix species
C 22 SU Scouler’s willow 928 SASC Salix scouleriana
C 23 OH other hardwoods 998 2TD
C 22 SU Scouler�s willow 928 SASC Salix scouleriana
C 23 OH other hardwoods 998 2TB
C
C AGE -- AGE OF BEST TREE
C I -- SPECIES NUMBER
Expand Down
8 changes: 4 additions & 4 deletions ak/essubh.f
View file
Original file line number Diff line number Diff line change
Expand Up @@ -48,14 +48,14 @@ SUBROUTINE ESSUBH (I,HHT,DELAY,GENTIM,TRAGE,JOSTND,DEBUG)
C 3 YC Alaska cedar 042 CANO9 Callitropsis nootkatensis
C 4 TA tamarack 071 LALA Larix laricina
C 5 WS white spruce 094 PIGL Picea glauca
C 6 LS Lutz’s spruce PILU Picea lutzii
C 6 LS Lutz�s spruce PILU Picea lutzii
C 7 BE black spruce 095 PIMA Picea mariana
C 8 SS Sitka spruce 098 PISI Picea sitchensis
C 9 LP lodgepole pine 108 PICO Pinus contorta
C 10 RC western redcedar 242 THPL Thuja plicata
C 11 WH western hemlock 263 TSHE Tsuga heterophylla
C 12 MH mountain hemlock 264 TSME Tsuga mertensiana
C 13 OS other softwoods 298 2TE
C 13 OS other softwoods 298 2TN
C 14 AD alder species 350 ALNUS Alnus species
C 15 RA red alder 351 ALRU2 Alnus rubra
C 16 PB paper birch 375 BEPA Betula papyrifera
Expand All @@ -64,8 +64,8 @@ SUBROUTINE ESSUBH (I,HHT,DELAY,GENTIM,TRAGE,JOSTND,DEBUG)
C 19 AS quaking aspen 746 POTR5 Populus tremuloides
C 20 CW black cottonwood 747 POBAT Populus trichocarpa
C 21 WI willow species 920 SALIX Salix species
C 22 SU Scouler’s willow 928 SASC Salix scouleriana
C 23 OH other hardwoods 998 2TD
C 22 SU Scouler�s willow 928 SASC Salix scouleriana
C 23 OH other hardwoods 998 2TB
C
C I -- SPECIES NUMBER
C BB -- INTERMEDIATE VARIABLE
Expand Down
4 changes: 2 additions & 2 deletions ak/estab.f
View file
Original file line number Diff line number Diff line change
Expand Up @@ -75,7 +75,7 @@ SUBROUTINE ESTAB (KDT)
C 10 RC western redcedar 242 THPL Thuja plicata 0.5 FT
C 11 WH western hemlock 263 TSHE Tsuga heterophylla 0.5 FT
C 12 MH mountain hemlock 264 TSME Tsuga mertensiana 0.5 FT
C 13 OS other softwoods 298 2TE 0.5 FT
C 13 OS other softwoods 298 2TN 0.5 FT
C 14 AD alder species 350 ALNUS Alnus species 1.0 FT
C 15 RA red alder 351 ALRU2 Alnus rubra 1.0 FT
C 16 PB paper birch 375 BEPA Betula papyrifera 1.0 FT
Expand All @@ -85,7 +85,7 @@ SUBROUTINE ESTAB (KDT)
C 20 CW black cottonwood 747 POBAT Populus trichocarpa 1.0 FT
C 21 WI willow species 920 SALIX Salix species 1.0 FT
C 22 SU Scouler’s willow 928 SASC Salix scouleriana 1.0 FT
C 23 OH other hardwoods 998 2TD 1.0 FT
C 23 OH other hardwoods 998 2TB 1.0 FT
C----------
C VARIABLE DECLARATIONS:
C----------
Expand Down
8 changes: 4 additions & 4 deletions ak/esxcsh.f
View file
Original file line number Diff line number Diff line change
Expand Up @@ -29,14 +29,14 @@ SUBROUTINE ESXCSH (TIME2,II,HHT,JOSTND,DEBUG)
C 3 YC Alaska cedar 042 CANO9 Callitropsis nootkatensis
C 4 TA tamarack 071 LALA Larix laricina
C 5 WS white spruce 094 PIGL Picea glauca
C 6 LS Lutz’s spruce PILU Picea lutzii
C 6 LS Lutz�s spruce PILU Picea lutzii
C 7 BE black spruce 095 PIMA Picea mariana
C 8 SS Sitka spruce 098 PISI Picea sitchensis
C 9 LP lodgepole pine 108 PICO Pinus contorta
C 10 RC western redcedar 242 THPL Thuja plicata
C 11 WH western hemlock 263 TSHE Tsuga heterophylla
C 12 MH mountain hemlock 264 TSME Tsuga mertensiana
C 13 OS other softwoods 298 2TE
C 13 OS other softwoods 298 2TN
C 14 AD alder species 350 ALNUS Alnus species
C 15 RA red alder 351 ALRU2 Alnus rubra
C 16 PB paper birch 375 BEPA Betula papyrifera
Expand All @@ -45,8 +45,8 @@ SUBROUTINE ESXCSH (TIME2,II,HHT,JOSTND,DEBUG)
C 19 AS quaking aspen 746 POTR5 Populus tremuloides
C 20 CW black cottonwood 747 POBAT Populus trichocarpa
C 21 WI willow species 920 SALIX Salix species
C 22 SU Scouler’s willow 928 SASC Salix scouleriana
C 23 OH other hardwoods 998 2TD
C 22 SU Scouler�s willow 928 SASC Salix scouleriana
C 23 OH other hardwoods 998 2TB
C
C II -- SPECIES NUMBER
C BB -- INTERMEDIATE VARIABLE
Expand Down
4 changes: 2 additions & 2 deletions ak/htcalc.f
View file
Original file line number Diff line number Diff line change
Expand Up @@ -27,7 +27,7 @@ SUBROUTINE HTCALC (N,ISPC,AGET,H,HTMAX,HTG,JOSTND,DEBUG)
C 10 RC western redcedar 242 THPL Thuja plicata
C 11 WH western hemlock 263 TSHE Tsuga heterophylla
C 12 MH mountain hemlock 264 TSME Tsuga mertensiana
C 13 P OS other softwoods 298 2TE
C 13 P OS other softwoods 298 2TN
C 14 AD alder species 350 ALNUS Alnus species
C 15 RA red alder 351 ALRU2 Alnus rubra
C 16 P PB paper birch 375 BEPA Betula papyrifera
Expand All @@ -37,7 +37,7 @@ SUBROUTINE HTCALC (N,ISPC,AGET,H,HTMAX,HTG,JOSTND,DEBUG)
C 20 P CW black cottonwood 747 POBAT Populus trichocarpa
C 21 P WI willow species 920 SALIX Salix species
C 22 P SU Scouler’s willow 928 SASC Salix scouleriana
C 23 P OH other hardwoods 998 2TD
C 23 P OH other hardwoods 998 2TB
C----------

C----------
Expand Down
8 changes: 4 additions & 4 deletions ak/htgf.f
View file
Original file line number Diff line number Diff line change
Expand Up @@ -16,14 +16,14 @@ SUBROUTINE HTGF
C 3 YC Alaska cedar 042 CANO9 Callitropsis nootkatensis
C 4 P TA tamarack 071 LALA Larix laricina
C 5 P WS white spruce 094 PIGL Picea glauca
C 6 P LS Lutz’s spruce PILU Picea lutzii
C 6 P LS Lutz�s spruce PILU Picea lutzii
C 7 P BE black spruce 095 PIMA Picea mariana
C 8 SS Sitka spruce 098 PISI Picea sitchensis
C 9 LP lodgepole pine 108 PICO Pinus contorta
C 10 RC western redcedar 242 THPL Thuja plicata
C 11 WH western hemlock 263 TSHE Tsuga heterophylla
C 12 MH mountain hemlock 264 TSME Tsuga mertensiana
C 13 P OS other softwoods 298 2TE
C 13 P OS other softwoods 298 2TN
C 14 AD alder species 350 ALNUS Alnus species
C 15 RA red alder 351 ALRU2 Alnus rubra
C 16 P PB paper birch 375 BEPA Betula papyrifera
Expand All @@ -32,8 +32,8 @@ SUBROUTINE HTGF
C 19 P AS quaking aspen 746 POTR5 Populus tremuloides
C 20 P CW black cottonwood 747 POBAT Populus trichocarpa
C 21 P WI willow species 920 SALIX Salix species
C 22 P SU Scouler’s willow 928 SASC Salix scouleriana
C 23 P OH other hardwoods 998 2TD
C 22 P SU Scouler�s willow 928 SASC Salix scouleriana
C 23 P OH other hardwoods 998 2TB
C
COMMONS
C
Expand Down
8 changes: 4 additions & 4 deletions ak/maical.f
View file
Original file line number Diff line number Diff line change
Expand Up @@ -52,14 +52,14 @@ SUBROUTINE MAICAL
C 3 YC Alaska cedar 042 CANO9 Callitropsis nootkatensis
C 4 TA tamarack 071 LALA Larix laricina
C 5 WS white spruce 094 PIGL Picea glauca
C 6 LS Lutz’s spruce PILU Picea lutzii
C 6 LS Lutz�s spruce PILU Picea lutzii
C 7 BE black spruce 095 PIMA Picea mariana
C 8 SS Sitka spruce 098 PISI Picea sitchensis
C 9 LP lodgepole pine 108 PICO Pinus contorta
C 10 RC western redcedar 242 THPL Thuja plicata
C 11 WH western hemlock 263 TSHE Tsuga heterophylla
C 12 MH mountain hemlock 264 TSME Tsuga mertensiana
C 13 OS other softwoods 298 2TE
C 13 OS other softwoods 298 2TN
C 14 AD alder species 350 ALNUS Alnus species
C 15 RA red alder 351 ALRU2 Alnus rubra
C 16 PB paper birch 375 BEPA Betula papyrifera
Expand All @@ -68,8 +68,8 @@ SUBROUTINE MAICAL
C 19 AS quaking aspen 746 POTR5 Populus tremuloides
C 20 CW black cottonwood 747 POBAT Populus trichocarpa
C 21 WI willow species 920 SALIX Salix species
C 22 SU Scouler’s willow 928 SASC Salix scouleriana
C 23 OH other hardwoods 998 2TD
C 22 SU Scouler�s willow 928 SASC Salix scouleriana
C 23 OH other hardwoods 998 2TB
C----------
C
C DATA STATEMENTS:
Expand Down
8 changes: 4 additions & 4 deletions ak/morts.f
View file
Original file line number Diff line number Diff line change
Expand Up @@ -19,14 +19,14 @@ SUBROUTINE MORTS
C 3 YC Alaska cedar 042 CANO9 Callitropsis nootkatensis
C 4 TA tamarack 071 LALA Larix laricina
C 5 WS white spruce 094 PIGL Picea glauca
C 6 LS Lutz’s spruce PILU Picea lutzii
C 6 LS Lutz�s spruce PILU Picea lutzii
C 7 BE black spruce 095 PIMA Picea mariana
C 8 SS Sitka spruce 098 PISI Picea sitchensis
C 9 LP lodgepole pine 108 PICO Pinus contorta
C 10 RC western redcedar 242 THPL Thuja plicata
C 11 WH western hemlock 263 TSHE Tsuga heterophylla
C 12 MH mountain hemlock 264 TSME Tsuga mertensiana
C 13 OS other softwoods 298 2TE
C 13 OS other softwoods 298 2TN
C 14 AD alder species 350 ALNUS Alnus species
C 15 RA red alder 351 ALRU2 Alnus rubra
C 16 PB paper birch 375 BEPA Betula papyrifera
Expand All @@ -35,8 +35,8 @@ SUBROUTINE MORTS
C 19 AS quaking aspen 746 POTR5 Populus tremuloides
C 20 CW black cottonwood 747 POBAT Populus trichocarpa
C 21 WI willow species 920 SALIX Salix species
C 22 SU Scouler’s willow 928 SASC Salix scouleriana
C 23 OH other hardwoods 998 2TD
C 22 SU Scouler�s willow 928 SASC Salix scouleriana
C 23 OH other hardwoods 998 2TB
C----------
COMMONS
C
Expand Down
8 changes: 4 additions & 4 deletions ak/regent.f
View file
Original file line number Diff line number Diff line change
Expand Up @@ -100,14 +100,14 @@ SUBROUTINE REGENT(LESTB,ITRNIN)
C 3 YC Alaska cedar 042 CANO9 Callitropsis nootkatensis
C 4 TA tamarack 071 LALA Larix laricina
C 5 WS white spruce 094 PIGL Picea glauca
C 6 LS Lutz’s spruce PILU Picea lutzii
C 6 LS Lutz�s spruce PILU Picea lutzii
C 7 BE black spruce 095 PIMA Picea mariana
C 8 SS Sitka spruce 098 PISI Picea sitchensis
C 9 LP lodgepole pine 108 PICO Pinus contorta
C 10 RC western redcedar 242 THPL Thuja plicata
C 11 WH western hemlock 263 TSHE Tsuga heterophylla
C 12 MH mountain hemlock 264 TSME Tsuga mertensiana
C 13 OS other softwoods 298 2TE
C 13 OS other softwoods 298 2TN
C 14 AD alder species 350 ALNUS Alnus species
C 15 RA red alder 351 ALRU2 Alnus rubra
C 16 PB paper birch 375 BEPA Betula papyrifera
Expand All @@ -116,8 +116,8 @@ SUBROUTINE REGENT(LESTB,ITRNIN)
C 19 AS quaking aspen 746 POTR5 Populus tremuloides
C 20 CW black cottonwood 747 POBAT Populus trichocarpa
C 21 WI willow species 920 SALIX Salix species
C 22 SU Scouler’s willow 928 SASC Salix scouleriana
C 23 OH other hardwoods 998 2TD
C 22 SU Scouler�s willow 928 SASC Salix scouleriana
C 23 OH other hardwoods 998 2TB
C
C----------
C DIMENSIONS FOR INTERNAL VARIABLES:
Expand Down
Loading

0 comments on commit 87d22b3

Please sign in to comment.