diff options
| author | HEBERT Alain <alain.hebert@polymtl.ca> | 2025-12-19 11:17:25 -0500 |
|---|---|---|
| committer | HEBERT Alain <alain.hebert@polymtl.ca> | 2025-12-19 11:17:25 -0500 |
| commit | 0086fa5c672a20b4fcefea39fca31313b9c08d68 (patch) | |
| tree | 837b47785e7876046a80ea6391c5d3b445b2d5ba /Donjon | |
| parent | 338c590068f0f867d89c78598af32f121df1936a (diff) | |
| parent | 682f80f4357f30780939ac84b8e2937233c647da (diff) | |
Merge branch '20-correct-a-ntot1-issue-in-spn-bivac-trivac-solutions' into 'main'
#20: Correct a NTOT1 issue in SPN Bivac/Trivac solutions
See merge request dragon/5.1!34
Diffstat (limited to 'Donjon')
| -rw-r--r-- | Donjon/src/MACINI.f | 1 | ||||
| -rw-r--r-- | Donjon/src/NCR.f | 2 |
2 files changed, 2 insertions, 1 deletions
diff --git a/Donjon/src/MACINI.f b/Donjon/src/MACINI.f index 86037d0..8e4ad6f 100644 --- a/Donjon/src/MACINI.f +++ b/Donjon/src/MACINI.f @@ -238,6 +238,7 @@ ENDIF ISTATE(7)=NDEL ISTATE(9)=LEAK + ISTATE(10)=MIN(NW1,NW2) CALL LCMPUT(IPMAC,'STATE-VECTOR',NSTATE,1,ISTATE) HSIGN='L_MACROLIB' CALL LCMPTC(IPMAC,'SIGNATURE',12,HSIGN) diff --git a/Donjon/src/NCR.f b/Donjon/src/NCR.f index 389e70b..e26d73d 100644 --- a/Donjon/src/NCR.f +++ b/Donjon/src/NCR.f @@ -61,7 +61,7 @@ * LOCAL VARIABLES *---- INTEGER, PARAMETER::IOUT=6 - INTEGER, PARAMETER::MAXISD=200 + INTEGER, PARAMETER::MAXISD=500 INTEGER, PARAMETER::NSTATE=40 REAL B2, FLOTT INTEGER I, I0, IACCS, ILENG, IMPX, INDIC, ITER, ITH, ITYLCM, ITYP, |