From 07e9774e2ccb0949b8de1d8ce8aa8bb9752e5aaf Mon Sep 17 00:00:00 2001
From: "Douglas G. Moore" <doug@39alpharesearch.org>
Date: Thu, 22 Jan 2026 11:53:52 -0700
Subject: [PATCH] Set hardcoded presmx to 90000

---
 src/eq3nr/src/eq3nr.f | 2 +-
 src/eq6/src/gpress.f  | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/eq3nr/src/eq3nr.f b/src/eq3nr/src/eq3nr.f
index dc4cf36..90db921 100644
--- a/src/eq3nr/src/eq3nr.f
+++ b/src/eq3nr/src/eq3nr.f
@@ -524,7 +524,7 @@ program eq3nr
 c
 c     Maximum allowed pressure (bars):
 c
-      data presmx /10000./
+      data presmx /90000./
 c
 c-----------------------------------------------------------------------
 c
diff --git a/src/eq6/src/gpress.f b/src/eq6/src/gpress.f
index 95f489b..bdc1239 100644
--- a/src/eq6/src/gpress.f
+++ b/src/eq6/src/gpress.f
@@ -50,7 +50,7 @@ subroutine gpress(iopt,jpress,noptmx,noutpt,nptkmx,nttyo,presg,
 c
 c     Maximum allowed pressure (bars):
 c
-      data presmx /10000./
+      data presmx /90000./
 c
 c-----------------------------------------------------------------------
 c