$NetBSD: patch-ah,v 1.1.1.1 2000/11/30 00:51:17 jtb Exp $ --- solsy.f.orig Fri Nov 17 17:05:55 2000 +++ solsy.f @@ -9,7 +9,7 @@ double precision rowns, 1 ccmax, el0, h, hmin, hmxi, hu, rc, tn, uround double precision di, hl0, phl0, r - dimension wm(1), iwm(1), x(1), tem(1) + dimension wm(*), iwm(*), x(1), tem(1) common /ls0001/ rowns(209), 2 ccmax, el0, h, hmin, hmxi, hu, rc, tn, uround, 3 iownd(14), iowns(6),