$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