From c234e0ad4a63b37eeb4f93ac05588403a60f2b20 Mon Sep 17 00:00:00 2001
From: Alain Hebert <alainhebert@Alains-MacBook-Pro.local>
Date: Sun, 2 Nov 2025 13:21:20 +0100
Subject: #10: Correct a power normalization issue in module EVO:

---
 Dragon/src/EDIGET.f | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'Dragon/src/EDIGET.f')

diff --git a/Dragon/src/EDIGET.f b/Dragon/src/EDIGET.f
index 175e7bd..c0334c5 100644
--- a/Dragon/src/EDIGET.f
+++ b/Dragon/src/EDIGET.f
@@ -113,7 +113,7 @@
 *----
 *  SUBROUTINE ARGUMENTS
 *----
-      PARAMETER    (MAXED=100,MAXOUT=100)
+      PARAMETER    (MAXED=300,MAXOUT=100)
       TYPE(C_PTR)   IPEDIT
       INTEGER       IFGEO,NGROUP,NGCOND,NREG,NBMIX,MATCOD(NREG),ITMERG,
      >              NMERGE,IHF,IFFAC,ILUPS,NSAVES,NSTATS,IGCR(NGROUP),
-- 
cgit v1.2.3