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