head 1.3; access; symbols pkgsrc-2026Q1:1.3.0.192 pkgsrc-2026Q1-base:1.3 pkgsrc-2025Q4:1.3.0.190 pkgsrc-2025Q4-base:1.3 pkgsrc-2025Q3:1.3.0.188 pkgsrc-2025Q3-base:1.3 pkgsrc-2025Q2:1.3.0.186 pkgsrc-2025Q2-base:1.3 pkgsrc-2025Q1:1.3.0.184 pkgsrc-2025Q1-base:1.3 pkgsrc-2024Q4:1.3.0.182 pkgsrc-2024Q4-base:1.3 pkgsrc-2024Q3:1.3.0.180 pkgsrc-2024Q3-base:1.3 pkgsrc-2024Q2:1.3.0.178 pkgsrc-2024Q2-base:1.3 pkgsrc-2024Q1:1.3.0.176 pkgsrc-2024Q1-base:1.3 pkgsrc-2023Q4:1.3.0.174 pkgsrc-2023Q4-base:1.3 pkgsrc-2023Q3:1.3.0.172 pkgsrc-2023Q3-base:1.3 pkgsrc-2023Q2:1.3.0.170 pkgsrc-2023Q2-base:1.3 pkgsrc-2023Q1:1.3.0.168 pkgsrc-2023Q1-base:1.3 pkgsrc-2022Q4:1.3.0.166 pkgsrc-2022Q4-base:1.3 pkgsrc-2022Q3:1.3.0.164 pkgsrc-2022Q3-base:1.3 pkgsrc-2022Q2:1.3.0.162 pkgsrc-2022Q2-base:1.3 pkgsrc-2022Q1:1.3.0.160 pkgsrc-2022Q1-base:1.3 pkgsrc-2021Q4:1.3.0.158 pkgsrc-2021Q4-base:1.3 pkgsrc-2021Q3:1.3.0.156 pkgsrc-2021Q3-base:1.3 pkgsrc-2021Q2:1.3.0.154 pkgsrc-2021Q2-base:1.3 pkgsrc-2021Q1:1.3.0.152 pkgsrc-2021Q1-base:1.3 pkgsrc-2020Q4:1.3.0.150 pkgsrc-2020Q4-base:1.3 pkgsrc-2020Q3:1.3.0.148 pkgsrc-2020Q3-base:1.3 pkgsrc-2020Q2:1.3.0.144 pkgsrc-2020Q2-base:1.3 pkgsrc-2020Q1:1.3.0.124 pkgsrc-2020Q1-base:1.3 pkgsrc-2019Q4:1.3.0.146 pkgsrc-2019Q4-base:1.3 pkgsrc-2019Q3:1.3.0.142 pkgsrc-2019Q3-base:1.3 pkgsrc-2019Q2:1.3.0.140 pkgsrc-2019Q2-base:1.3 pkgsrc-2019Q1:1.3.0.138 pkgsrc-2019Q1-base:1.3 pkgsrc-2018Q4:1.3.0.136 pkgsrc-2018Q4-base:1.3 pkgsrc-2018Q3:1.3.0.134 pkgsrc-2018Q3-base:1.3 pkgsrc-2018Q2:1.3.0.132 pkgsrc-2018Q2-base:1.3 pkgsrc-2018Q1:1.3.0.130 pkgsrc-2018Q1-base:1.3 pkgsrc-2017Q4:1.3.0.128 pkgsrc-2017Q4-base:1.3 pkgsrc-2017Q3:1.3.0.126 pkgsrc-2017Q3-base:1.3 pkgsrc-2017Q2:1.3.0.122 pkgsrc-2017Q2-base:1.3 pkgsrc-2017Q1:1.3.0.120 pkgsrc-2017Q1-base:1.3 pkgsrc-2016Q4:1.3.0.118 pkgsrc-2016Q4-base:1.3 pkgsrc-2016Q3:1.3.0.116 pkgsrc-2016Q3-base:1.3 pkgsrc-2016Q2:1.3.0.114 pkgsrc-2016Q2-base:1.3 pkgsrc-2016Q1:1.3.0.112 pkgsrc-2016Q1-base:1.3 pkgsrc-2015Q4:1.3.0.110 pkgsrc-2015Q4-base:1.3 pkgsrc-2015Q3:1.3.0.108 pkgsrc-2015Q3-base:1.3 pkgsrc-2015Q2:1.3.0.106 pkgsrc-2015Q2-base:1.3 pkgsrc-2015Q1:1.3.0.104 pkgsrc-2015Q1-base:1.3 pkgsrc-2014Q4:1.3.0.102 pkgsrc-2014Q4-base:1.3 pkgsrc-2014Q3:1.3.0.100 pkgsrc-2014Q3-base:1.3 pkgsrc-2014Q2:1.3.0.98 pkgsrc-2014Q2-base:1.3 pkgsrc-2014Q1:1.3.0.96 pkgsrc-2014Q1-base:1.3 pkgsrc-2013Q4:1.3.0.94 pkgsrc-2013Q4-base:1.3 pkgsrc-2013Q3:1.3.0.92 pkgsrc-2013Q3-base:1.3 pkgsrc-2013Q2:1.3.0.90 pkgsrc-2013Q2-base:1.3 pkgsrc-2013Q1:1.3.0.88 pkgsrc-2013Q1-base:1.3 pkgsrc-2012Q4:1.3.0.86 pkgsrc-2012Q4-base:1.3 pkgsrc-2012Q3:1.3.0.84 pkgsrc-2012Q3-base:1.3 pkgsrc-2012Q2:1.3.0.82 pkgsrc-2012Q2-base:1.3 pkgsrc-2012Q1:1.3.0.80 pkgsrc-2012Q1-base:1.3 pkgsrc-2011Q4:1.3.0.78 pkgsrc-2011Q4-base:1.3 pkgsrc-2011Q3:1.3.0.76 pkgsrc-2011Q3-base:1.3 pkgsrc-2011Q2:1.3.0.74 pkgsrc-2011Q2-base:1.3 pkgsrc-2011Q1:1.3.0.72 pkgsrc-2011Q1-base:1.3 pkgsrc-2010Q4:1.3.0.70 pkgsrc-2010Q4-base:1.3 pkgsrc-2010Q3:1.3.0.68 pkgsrc-2010Q3-base:1.3 pkgsrc-2010Q2:1.3.0.66 pkgsrc-2010Q2-base:1.3 pkgsrc-2010Q1:1.3.0.64 pkgsrc-2010Q1-base:1.3 pkgsrc-2009Q4:1.3.0.62 pkgsrc-2009Q4-base:1.3 pkgsrc-2009Q3:1.3.0.60 pkgsrc-2009Q3-base:1.3 pkgsrc-2009Q2:1.3.0.58 pkgsrc-2009Q2-base:1.3 pkgsrc-2009Q1:1.3.0.56 pkgsrc-2009Q1-base:1.3 pkgsrc-2008Q4:1.3.0.54 pkgsrc-2008Q4-base:1.3 pkgsrc-2008Q3:1.3.0.52 pkgsrc-2008Q3-base:1.3 cube-native-xorg:1.3.0.50 cube-native-xorg-base:1.3 pkgsrc-2008Q2:1.3.0.48 pkgsrc-2008Q2-base:1.3 cwrapper:1.3.0.46 pkgsrc-2008Q1:1.3.0.44 pkgsrc-2008Q1-base:1.3 pkgsrc-2007Q4:1.3.0.42 pkgsrc-2007Q4-base:1.3 pkgsrc-2007Q3:1.3.0.40 pkgsrc-2007Q3-base:1.3 pkgsrc-2007Q2:1.3.0.38 pkgsrc-2007Q2-base:1.3 pkgsrc-2007Q1:1.3.0.36 pkgsrc-2007Q1-base:1.3 pkgsrc-2006Q4:1.3.0.34 pkgsrc-2006Q4-base:1.3 pkgsrc-2006Q3:1.3.0.32 pkgsrc-2006Q3-base:1.3 pkgsrc-2006Q2:1.3.0.30 pkgsrc-2006Q2-base:1.3 pkgsrc-2006Q1:1.3.0.28 pkgsrc-2006Q1-base:1.3 pkgsrc-2005Q4:1.3.0.26 pkgsrc-2005Q4-base:1.3 pkgsrc-2005Q3:1.3.0.24 pkgsrc-2005Q3-base:1.3 pkgsrc-2005Q2:1.3.0.22 pkgsrc-2005Q2-base:1.3 pkgsrc-2005Q1:1.3.0.20 pkgsrc-2005Q1-base:1.3 pkgsrc-2004Q4:1.3.0.18 pkgsrc-2004Q4-base:1.3 pkgsrc-2004Q3:1.3.0.16 pkgsrc-2004Q3-base:1.3 pkgsrc-2004Q2:1.3.0.14 pkgsrc-2004Q2-base:1.3 pkgsrc-2004Q1:1.3.0.12 pkgsrc-2004Q1-base:1.3 pkgsrc-2003Q4:1.3.0.10 pkgsrc-2003Q4-base:1.3 netbsd-1-6-1:1.3.0.6 netbsd-1-6-1-base:1.3 netbsd-1-6:1.3.0.8 netbsd-1-6-RELEASE-base:1.3 pkgviews:1.3.0.4 pkgviews-base:1.3 buildlink2:1.3.0.2 buildlink2-base:1.3 netbsd-1-5-PATCH003:1.3 netbsd-1-5-PATCH001:1.3 pkgsrc-base:1.1.1.1 TNF:1.1.1; locks; strict; comment @# @; 1.3 date 2001.01.23.20.55.44; author jtb; state Exp; branches; next 1.2; 1.2 date 2001.01.22.23.30.02; author jtb; state Exp; branches; next 1.1; 1.1 date 2000.11.28.02.17.03; author jtb; state Exp; branches 1.1.1.1; next ; 1.1.1.1 date 2000.11.28.02.17.03; author jtb; state Exp; branches; next ; desc @@ 1.3 log @Use one patch per file, undoing previous change. @ text @$NetBSD$ --- cfftb1.f.orig Fri Nov 17 16:48:23 2000 +++ cfftb1.f @@@@ -1,5 +1,5 @@@@ SUBROUTINE CFFTB1 (N,C,CH,WA,IFAC) - DIMENSION CH(1) ,C(1) ,WA(1) ,IFAC(1) + DIMENSION CH(1) ,C(1) ,WA(1) ,IFAC(*) NF = IFAC(2) NA = 0 L1 = 1 @ 1.2 log @Roll the 13 trivial patches into one (save some inodes!). Clean it up a bit. @ text @d1 1 a1 1 $NetBSD: patch-aa,v 1.1.1.1 2000/11/28 02:17:03 jtb Exp $ a11 122 --- cfftf1.f.orig Fri Nov 17 16:48:23 2000 +++ cfftf1.f @@@@ -1,5 +1,5 @@@@ SUBROUTINE CFFTF1 (N,C,CH,WA,IFAC) - DIMENSION CH(1) ,C(1) ,WA(1) ,IFAC(1) + DIMENSION CH(1) ,C(1) ,WA(1) ,IFAC(*) NF = IFAC(2) NA = 0 L1 = 1 --- 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 --- cosqb.f.orig Fri Nov 17 16:48:23 2000 +++ cosqb.f @@@@ -1,5 +1,5 @@@@ SUBROUTINE COSQB (N,X,WSAVE) - DIMENSION X(1) ,WSAVE(1) + DIMENSION X(*) ,WSAVE(1) DATA TSQRT2 /2.82842712474619/ IF (N-2) 101,102,103 101 X(1) = 4.*X(1) --- cosqf.f.orig Fri Nov 17 16:48:23 2000 +++ cosqf.f @@@@ -1,5 +1,5 @@@@ SUBROUTINE COSQF (N,X,WSAVE) - DIMENSION X(1) ,WSAVE(1) + DIMENSION X(*) ,WSAVE(1) DATA SQRT2 /1.4142135623731/ IF (N-2) 102,101,103 101 TSQX = SQRT2*X(2) --- cost.f.orig Fri Nov 17 16:48:23 2000 +++ cost.f @@@@ -1,5 +1,5 @@@@ SUBROUTINE COST (N,X,WSAVE) - DIMENSION X(1) ,WSAVE(1) + DIMENSION X(*) ,WSAVE(1) NM1 = N-1 NP1 = N+1 NS2 = N/2 --- ezfft1.f.orig Fri Nov 17 16:48:23 2000 +++ ezfft1.f @@@@ -1,5 +1,5 @@@@ SUBROUTINE EZFFT1 (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)/4,2,3,5/ 1 ,TPI/6.28318530717959/ NL = N --- ezfftb.f.orig Fri Nov 17 16:48:23 2000 +++ ezfftb.f @@@@ -1,5 +1,5 @@@@ SUBROUTINE EZFFTB (N,R,AZERO,A,B,WSAVE) - DIMENSION R(1) ,A(1) ,B(1) ,WSAVE(1) + DIMENSION R(*) ,A(1) ,B(1) ,WSAVE(1) IF (N-2) 101,102,103 101 R(1) = AZERO RETURN --- ezfftf.f.orig Fri Nov 17 16:48:24 2000 +++ ezfftf.f @@@@ -2,7 +2,7 @@@@ C C VERSION 3 JUNE 1979 C - DIMENSION R(1) ,A(1) ,B(1) ,WSAVE(1) + DIMENSION R(*) ,A(1) ,B(1) ,WSAVE(1) IF (N-2) 101,102,103 101 AZERO = R(1) RETURN --- rfftb1.f.orig Fri Nov 17 16:48:24 2000 +++ rfftb1.f @@@@ -1,5 +1,5 @@@@ SUBROUTINE RFFTB1 (N,C,CH,WA,IFAC) - DIMENSION CH(1) ,C(1) ,WA(1) ,IFAC(1) + DIMENSION CH(1) ,C(1) ,WA(1) ,IFAC(*) NF = IFAC(2) NA = 0 L1 = 1 --- rfftf1.f.orig Fri Nov 17 16:48:24 2000 +++ rfftf1.f @@@@ -1,5 +1,5 @@@@ SUBROUTINE RFFTF1 (N,C,CH,WA,IFAC) - DIMENSION CH(1) ,C(1) ,WA(1) ,IFAC(1) + DIMENSION CH(1) ,C(1) ,WA(1) ,IFAC(*) NF = IFAC(2) NA = 1 L2 = N --- rffti1.f.orig Fri Nov 17 16:48:24 2000 +++ rffti1.f @@@@ -1,5 +1,5 @@@@ SUBROUTINE RFFTI1 (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)/4,2,3,5/ NL = N NF = 0 --- sint1.f.orig Fri Nov 17 16:48:24 2000 +++ sint1.f @@@@ -1,5 +1,5 @@@@ SUBROUTINE SINT1(N,WAR,WAS,XH,X,IFAC) - DIMENSION WAR(1),WAS(1),X(1),XH(1),IFAC(1) + DIMENSION WAR(1),WAS(1),X(1),XH(*),IFAC(1) DATA SQRT3 /1.73205080756888/ DO 100 I=1,N XH(I) = WAR(I) @ 1.1 log @Initial revision @ text @d1 1 a1 1 $NetBSD$ d12 122 @ 1.1.1.1 log @Initial import of new "fftpack" package: Single precision Fortran FFT subroutines @ text @@