summaryrefslogtreecommitdiff
path: root/Dragon/src/EDIDRV.f
diff options
context:
space:
mode:
authorAlain Hebert <alainhebert@Alains-MacBook-Pro.local>2025-11-02 13:21:20 +0100
committerAlain Hebert <alainhebert@Alains-MacBook-Pro.local>2025-11-02 13:21:20 +0100
commitc234e0ad4a63b37eeb4f93ac05588403a60f2b20 (patch)
tree2c6cbaa77460b43053edfb9d865fd568ba160322 /Dragon/src/EDIDRV.f
parentbb19a602772d4fe89f5fa2e534b93237330fd89f (diff)
#10: Correct a power normalization issue in module EVO:
Diffstat (limited to 'Dragon/src/EDIDRV.f')
-rw-r--r--Dragon/src/EDIDRV.f2
1 files changed, 1 insertions, 1 deletions
diff --git a/Dragon/src/EDIDRV.f b/Dragon/src/EDIDRV.f
index 53ddd67..4c00e28 100644
--- a/Dragon/src/EDIDRV.f
+++ b/Dragon/src/EDIDRV.f
@@ -120,7 +120,7 @@
*----
* LOCAL VARIABLES
*----
- PARAMETER (IUNOUT=6,MAXED=100,NSTATE=40,IOUT=6)
+ PARAMETER (IUNOUT=6,MAXED=300,NSTATE=40,IOUT=6)
TYPE(C_PTR) JPFLUX,JPFLUA,IPMIC2,IPMAC2,IPADF,JPLIB,KPLIB,
> KPEDIT,JPMAC2,KPMAC2
CHARACTER HSIGN*12,TEXT8*8,HVECT(MAXED)*8,NISEXT*6,NISOTX*12,