summaryrefslogtreecommitdiff
path: root/math/linpack/patches/patch-ad
blob: 43f405be6715bb3454d9f61b68145aad03138f22 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
$NetBSD: patch-ad,v 1.1.1.1 2001/04/27 22:57:31 jtb Exp $

--- dptsl.f.orig	Thu Jan  5 21:00:46 1984
+++ dptsl.f
@@ -1,6 +1,6 @@
       subroutine dptsl(n,d,e,b)
       integer n
-      double precision d(1),e(1),b(1)
+      double precision d(1),e(1),b(*)
 c
 c     dptsl given a positive definite tridiagonal matrix and a right
 c     hand side will find the solution.