From fd2671c00d2aa6659d51cd676d9d0a01016cd248 Mon Sep 17 00:00:00 2001
From: Alain Hebert <alainhebert@Alains-MacBook-Pro.local>
Date: Sun, 19 Oct 2025 11:39:22 +0200
Subject: #8: Improve epsilon tests and error detection in module SALT:

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

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

diff --git a/Dragon/src/EVOSIG.f b/Dragon/src/EVOSIG.f
index 3e5c172..a9c282e 100644
--- a/Dragon/src/EVOSIG.f
+++ b/Dragon/src/EVOSIG.f
@@ -198,7 +198,7 @@
         SIG(IS,NREAC,IBM)=SIG(IS,NREAC,IBM)+1.0E-3*FACT*REAL(GAR)
         DEALLOCATE(ZKERMA)
       ELSE
-        IF(IGLOB.EQ.-1) THEN
+        IF((IGLOB.EQ.-1).AND.(AWR(IS).GT.210.0)) THEN
           CALL XABORT('EVOSIG: EDP0 OPTION NEEDS H-FACTOR INFORMATION.')
         ENDIF
       ENDIF
-- 
cgit v1.2.3