1
2
3
4
5
6
7
8
9
10
11
12
13
|
$NetBSD: patch-af,v 1.1.1.1 2000/11/30 00:51:17 jtb Exp $
--- slsbt.f.orig Fri Nov 17 17:05:55 2000
+++ slsbt.f
@@ -3,7 +3,7 @@
integer iwm
integer lblox, lpb, lpc, mb, nb
double precision wm, x, tem
- dimension wm(1), iwm(1), x(1), tem(1)
+ dimension wm(*), iwm(*), x(1), tem(1)
c-----------------------------------------------------------------------
c this routine acts as an interface between the core integrator
c routine and the solbt routine for the solution of the linear system
|