diff options
| -rw-r--r-- | SRC/dlasq4.f | 1 | ||||
| -rw-r--r-- | SRC/slasq4.f | 1 |
2 files changed, 0 insertions, 2 deletions
diff --git a/SRC/dlasq4.f b/SRC/dlasq4.f index cb7a714c..56e95ed6 100644 --- a/SRC/dlasq4.f +++ b/SRC/dlasq4.f @@ -240,7 +240,6 @@ NP = NN - 9 ELSE NP = NN - 2*PP - B2 = Z( NP-2 ) GAM = DN1 IF( Z( NP-4 ) .GT. Z( NP-2 ) ) $ RETURN diff --git a/SRC/slasq4.f b/SRC/slasq4.f index 32496a24..78fb7e69 100644 --- a/SRC/slasq4.f +++ b/SRC/slasq4.f @@ -240,7 +240,6 @@ NP = NN - 9 ELSE NP = NN - 2*PP - B2 = Z( NP-2 ) GAM = DN1 IF( Z( NP-4 ) .GT. Z( NP-2 ) ) $ RETURN |