summaryrefslogtreecommitdiff
path: root/Dragon/src/EVOSIG.f
diff options
context:
space:
mode:
Diffstat (limited to 'Dragon/src/EVOSIG.f')
-rw-r--r--Dragon/src/EVOSIG.f2
1 files changed, 1 insertions, 1 deletions
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