diff options
Diffstat (limited to 'Jexpint.f')
-rwxr-xr-x | Jexpint.f | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -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 |