summaryrefslogtreecommitdiff
path: root/SRC/dlasq4.f
diff options
context:
space:
mode:
Diffstat (limited to 'SRC/dlasq4.f')
-rw-r--r--SRC/dlasq4.f1
1 files changed, 0 insertions, 1 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