$NetBSD: patch-ac,v 1.3 2001/01/23 20:55:44 jtb Exp $ --- cffti1.f.orig Fri Nov 17 16:48:23 2000 +++ cffti1.f @@ -1,5 +1,5 @@ SUBROUTINE CFFTI1 (N,WA,IFAC) - DIMENSION WA(1) ,IFAC(1) ,NTRYH(4) + DIMENSION WA(1) ,IFAC(*) ,NTRYH(4) DATA NTRYH(1),NTRYH(2),NTRYH(3),NTRYH(4)/3,4,2,5/ NL = N NF = 0