aboutsummaryrefslogtreecommitdiff
path: root/Jexpint.f
diff options
context:
space:
mode:
Diffstat (limited to 'Jexpint.f')
-rwxr-xr-xJexpint.f4
1 files changed, 2 insertions, 2 deletions
diff --git a/Jexpint.f b/Jexpint.f
index d67f00d..d65b850 100755
--- a/Jexpint.f
+++ b/Jexpint.f
@@ -26,8 +26,8 @@ c******************************************************************************
1.0435694088/
data xsave /0./
c
- if (x.ge.100.) goto 800
- if (x.le.-100.) goto 800
+ if (x>=100.) goto 800
+ if (x<=-100.) goto 800
xu=x
if(xu)603,602,603
602 rex=1.d+00