Initial import of new "fftpack" package:
Single precision Fortran FFT subroutines
This commit is contained in:
parent
0c5dd40669
commit
dd3670b351
20 changed files with 300 additions and 0 deletions
49
math/fftpack/Makefile
Normal file
49
math/fftpack/Makefile
Normal file
|
@ -0,0 +1,49 @@
|
||||||
|
# $NetBSD: Makefile,v 1.1.1.1 2000/11/28 02:17:00 jtb Exp $
|
||||||
|
|
||||||
|
DISTNAME= fftpack
|
||||||
|
PKGNAME= fftpack-4.0
|
||||||
|
CATEGORIES= math
|
||||||
|
MASTER_SITES= ftp://netlib.bell-labs.com/netlib/fftpack/ \
|
||||||
|
ftp://netlib.no/netlib/fftpack/ \
|
||||||
|
ftp://ftp.zib.de/netlib/fftpack/ \
|
||||||
|
ftp://www.hensa.ac.uk/mirrors/netlib/fftpack/
|
||||||
|
DISTFILES= ${SRCS:.f=.f.gz} doc.gz
|
||||||
|
|
||||||
|
MAINTAINER= jtb@netbsd.org
|
||||||
|
|
||||||
|
DIST_SUBDIR= ${DISTNAME}
|
||||||
|
NO_WRKSUBDIR= YES
|
||||||
|
|
||||||
|
USE_LIBTOOL= YES
|
||||||
|
UES_FORTRAN= YES
|
||||||
|
|
||||||
|
FOPTS?= -O2
|
||||||
|
MAKE_ENV+= "FFLAGS=${FOPTS}"
|
||||||
|
|
||||||
|
SRCS = cfftb.f cosqf1.f passb2.f radb2.f radfg.f \
|
||||||
|
sinqi.f cfftb1.f cosqi.f passb3.f radb3.f rfftb.f \
|
||||||
|
sint.f cfftf.f cost.f passb4.f radb4.f rfftb1.f \
|
||||||
|
sint1.f cfftf1.f costi.f passb5.f radb5.f rfftf.f \
|
||||||
|
sinti.f cffti.f ezfft1.f passf.f radbg.f rfftf1.f \
|
||||||
|
test.f cffti1.f ezfftb.f passf2.f radf2.f rffti.f \
|
||||||
|
cosqb.f ezfftf.f passf3.f radf3.f rffti1.f cosqb1.f \
|
||||||
|
ezffti.f passf4.f radf4.f sinqb.f cosqf.f passb.f \
|
||||||
|
passf5.f radf5.f sinqf.f
|
||||||
|
|
||||||
|
.include "../../mk/bsd.prefs.mk"
|
||||||
|
|
||||||
|
do-extract:
|
||||||
|
@${MKDIR} ${WRKDIR}
|
||||||
|
@for f in ${SRCS} ; do \
|
||||||
|
${GZCAT} ${DISTDIR}/${DIST_SUBDIR}/$$f.gz > ${WRKSRC}/$$f ; done
|
||||||
|
@${GZCAT} ${DISTDIR}/${DIST_SUBDIR}/doc.gz > ${WRKSRC}/doc
|
||||||
|
|
||||||
|
post-extract:
|
||||||
|
@${SED} -e 's:%%FORTRAN%%:'${FC}':g' \
|
||||||
|
< ${FILESDIR}/Makefile > ${WRKSRC}/Makefile
|
||||||
|
|
||||||
|
post-install:
|
||||||
|
${INSTALL_DATA_DIR} ${PREFIX}/share/doc/fftpack
|
||||||
|
${INSTALL_DATA} ${WRKSRC}/doc ${PREFIX}/share/doc/fftpack
|
||||||
|
|
||||||
|
.include "../../mk/bsd.pkg.mk"
|
29
math/fftpack/files/Makefile
Normal file
29
math/fftpack/files/Makefile
Normal file
|
@ -0,0 +1,29 @@
|
||||||
|
LIB = fftpack
|
||||||
|
|
||||||
|
LIBDIR = ${PREFIX}/lib
|
||||||
|
FORTRAN = %%FORTRAN%%
|
||||||
|
|
||||||
|
all: lib$(LIB)
|
||||||
|
|
||||||
|
OBJ = cfftb.o cosqf1.o passb2.o radb2.o radfg.o \
|
||||||
|
sinqi.o cfftb1.o cosqi.o passb3.o radb3.o rfftb.o \
|
||||||
|
sint.o cfftf.o cost.o passb4.o radb4.o rfftb1.o \
|
||||||
|
sint1.o cfftf1.o costi.o passb5.o radb5.o rfftf.o \
|
||||||
|
sinti.o cffti.o ezfft1.o passf.o radbg.o rfftf1.o \
|
||||||
|
cffti1.o ezfftb.o passf2.o radf2.o rffti.o \
|
||||||
|
cosqb.o ezfftf.o passf3.o radf3.o rffti1.o cosqb1.o \
|
||||||
|
ezffti.o passf4.o radf4.o sinqb.o cosqf.o passb.o \
|
||||||
|
passf5.o radf5.o sinqf.o
|
||||||
|
|
||||||
|
lib$(LIB): $(OBJ)
|
||||||
|
@$(LIBTOOL) --mode=link $(FORTRAN) -O -o lib$(LIB).la $(OBJ:.o=.lo) \
|
||||||
|
-rpath $(LIBDIR)
|
||||||
|
|
||||||
|
.f.o:
|
||||||
|
@$(LIBTOOL) --mode=compile $(FORTRAN) $(FFLAGS) -c $<
|
||||||
|
|
||||||
|
install: lib$(LIB)
|
||||||
|
@$(LIBTOOL) --mode=install install -c lib$(LIB).la $(LIBDIR)
|
||||||
|
|
||||||
|
clean:
|
||||||
|
rm -rf *.o *.lo .libs lib$(LIB).la
|
52
math/fftpack/files/md5
Normal file
52
math/fftpack/files/md5
Normal file
|
@ -0,0 +1,52 @@
|
||||||
|
$NetBSD: md5,v 1.1.1.1 2000/11/28 02:17:02 jtb Exp $
|
||||||
|
MD5 (fftpack/cfftb.f.gz) = eddc44c6dad8eba91e334feaaeda22e4
|
||||||
|
MD5 (fftpack/cfftb1.f.gz) = 17b1f4957222bf23c3e6acbf81bdda98
|
||||||
|
MD5 (fftpack/cfftf.f.gz) = b24df97cd5efd8cf3eadcd4de58c878f
|
||||||
|
MD5 (fftpack/cfftf1.f.gz) = aa6aa8bd3088b86a0596215afbfd44a0
|
||||||
|
MD5 (fftpack/cffti.f.gz) = d9c240a0bbcd30dbe08d82360d252960
|
||||||
|
MD5 (fftpack/cffti1.f.gz) = 863710b8171afad52f295a3308b00b33
|
||||||
|
MD5 (fftpack/cosqb.f.gz) = 3d8b22f586a7a75931e32048b63bbbd7
|
||||||
|
MD5 (fftpack/cosqb1.f.gz) = 1fcc8f06d0d76c2ec382a8da11680178
|
||||||
|
MD5 (fftpack/cosqf.f.gz) = 8ee88c13fb8898e858e0dc2cf815e38d
|
||||||
|
MD5 (fftpack/cosqf1.f.gz) = 86056fd67c8b71a42505c8de90f0c88d
|
||||||
|
MD5 (fftpack/cosqi.f.gz) = bd5b09ce4286d0fe5d652d8542724692
|
||||||
|
MD5 (fftpack/cost.f.gz) = 11286bd1b217857ca8ae5c5cf0d7cbad
|
||||||
|
MD5 (fftpack/costi.f.gz) = 9a0ed4f9ab8b7105bee1f9f921e77224
|
||||||
|
MD5 (fftpack/ezfft1.f.gz) = 07ce8b836eb9f793c0988d224ce1d4ba
|
||||||
|
MD5 (fftpack/ezfftb.f.gz) = a05bb2af39bea5499d75032ceb70b36e
|
||||||
|
MD5 (fftpack/ezfftf.f.gz) = f5c1a6e25dc5877a03d40ce836485d32
|
||||||
|
MD5 (fftpack/ezffti.f.gz) = 38892615af9c12288b5f9e9515d7870c
|
||||||
|
MD5 (fftpack/passb.f.gz) = 17a20a2495b6dccff4ea8c5766d518da
|
||||||
|
MD5 (fftpack/passb2.f.gz) = 8518a74b865ffca9d92031684e9c3f71
|
||||||
|
MD5 (fftpack/passb3.f.gz) = 2081d50a94ec6dab772a73a30cab91b1
|
||||||
|
MD5 (fftpack/passb4.f.gz) = 82958c4fea369be3a162958d9238da0d
|
||||||
|
MD5 (fftpack/passb5.f.gz) = fefcd9f5c9d0f591836b532c3d30d23c
|
||||||
|
MD5 (fftpack/passf.f.gz) = 8f4bf0c3dcbfdfee2230911485b36669
|
||||||
|
MD5 (fftpack/passf2.f.gz) = 0cdbeb0650eb04775fcf452ca25b7d45
|
||||||
|
MD5 (fftpack/passf3.f.gz) = 2ad7f7db37c5caf7e738d7f6263d41c7
|
||||||
|
MD5 (fftpack/passf4.f.gz) = cd234787909fe3eaa1af704ce3c9632d
|
||||||
|
MD5 (fftpack/passf5.f.gz) = c48f898ed809b8e3fa14b816a0ea516d
|
||||||
|
MD5 (fftpack/radb2.f.gz) = a36a452b7f3f9226fa937f7a23d76fad
|
||||||
|
MD5 (fftpack/radb3.f.gz) = 342f01bb0f44fe625a2c4bedc7e5f436
|
||||||
|
MD5 (fftpack/radb4.f.gz) = d1176da69e5d5053f6c275520c853bd4
|
||||||
|
MD5 (fftpack/radb5.f.gz) = 4a5a354232907e4970e503959318200d
|
||||||
|
MD5 (fftpack/radbg.f.gz) = 541bf2e35c4d8e14a9261dffca0fa9f9
|
||||||
|
MD5 (fftpack/radf2.f.gz) = 3814e4e77bc302bc979a7f86d3e1eb29
|
||||||
|
MD5 (fftpack/radf3.f.gz) = 1811d3da0bec16989b76552741db47a3
|
||||||
|
MD5 (fftpack/radf4.f.gz) = 67bde444fb2863c00e35c8de0751b0a2
|
||||||
|
MD5 (fftpack/radf5.f.gz) = 7f6fda1c240ecbc6743686bbbd8603be
|
||||||
|
MD5 (fftpack/radfg.f.gz) = 7a28ebc84374170e7e25f4879f56af69
|
||||||
|
MD5 (fftpack/rfftb.f.gz) = 6393d5ded629d8e66fffc7a4a4b0dfab
|
||||||
|
MD5 (fftpack/rfftb1.f.gz) = bcf2ad4b0ed5519d0ac631ca98b75d4d
|
||||||
|
MD5 (fftpack/rfftf.f.gz) = 5226455e19b25e98cff6d8e1de6a654d
|
||||||
|
MD5 (fftpack/rfftf1.f.gz) = 36247ef775bf79e32718d7c41fb73812
|
||||||
|
MD5 (fftpack/rffti.f.gz) = 8d967cee93f7836c4c68a03d3b00e686
|
||||||
|
MD5 (fftpack/rffti1.f.gz) = eefd0a16635c1ee0b21b823bc0974e8b
|
||||||
|
MD5 (fftpack/sinqb.f.gz) = 27615c54ebd2fc247d309527616cde9a
|
||||||
|
MD5 (fftpack/sinqf.f.gz) = 11c680b8d8b04545b0a1ac8ec10c7ee1
|
||||||
|
MD5 (fftpack/sinqi.f.gz) = 804edede13fd999bf53b451465eb7af2
|
||||||
|
MD5 (fftpack/sint.f.gz) = 3ab544b3387c67fbf1ab4920c7004bf8
|
||||||
|
MD5 (fftpack/sint1.f.gz) = 0c4bc3e08325b38a50ce4fc73bcf05d3
|
||||||
|
MD5 (fftpack/sinti.f.gz) = fb89b68e80bd9b335e5d1634fa422138
|
||||||
|
MD5 (fftpack/test.f.gz) = 5aa0e0f45b6a8970a6f3bfedb44d94d7
|
||||||
|
MD5 (fftpack/doc.gz) = 3bdb87ff62c718e8b2b27ada0c5c073a
|
15
math/fftpack/files/patch-sum
Normal file
15
math/fftpack/files/patch-sum
Normal file
|
@ -0,0 +1,15 @@
|
||||||
|
$NetBSD: patch-sum,v 1.1.1.1 2000/11/28 02:17:02 jtb Exp $
|
||||||
|
|
||||||
|
MD5 (patch-aa) = 2ce242bf4f6517e26ebfe052478aeec9
|
||||||
|
MD5 (patch-ab) = a22c8f5b2db45ab0158e99b06f3597c2
|
||||||
|
MD5 (patch-ac) = a03c41bcc139ba8354f31a588ffb7fdc
|
||||||
|
MD5 (patch-ad) = 3696c86d63c5a3172b7c243dd5d0be55
|
||||||
|
MD5 (patch-ae) = 25ffafb4fb407e377d87d9b724ac26ac
|
||||||
|
MD5 (patch-af) = 95fc40b0e2c4c40ab63a081200e1a437
|
||||||
|
MD5 (patch-ag) = e6a00232fa52bebd03097bdde5adb9ee
|
||||||
|
MD5 (patch-ah) = 78c1dc78af77b77a4f230911c422549c
|
||||||
|
MD5 (patch-ai) = 200a7967826bf87d9b241fef609e05f7
|
||||||
|
MD5 (patch-aj) = 640b261c2017e9e0d1be71aa0b9931d5
|
||||||
|
MD5 (patch-ak) = e667ba2273c8c192e9d3b460b8d70802
|
||||||
|
MD5 (patch-al) = 0640528d8710ee8e0da7cd1926553000
|
||||||
|
MD5 (patch-am) = da441cdff0119b5d8dcee2b852f245c1
|
11
math/fftpack/patches/patch-aa
Normal file
11
math/fftpack/patches/patch-aa
Normal file
|
@ -0,0 +1,11 @@
|
||||||
|
$NetBSD: patch-aa,v 1.1.1.1 2000/11/28 02:17:03 jtb Exp $
|
||||||
|
|
||||||
|
--- 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
|
11
math/fftpack/patches/patch-ab
Normal file
11
math/fftpack/patches/patch-ab
Normal file
|
@ -0,0 +1,11 @@
|
||||||
|
$NetBSD: patch-ab,v 1.1.1.1 2000/11/28 02:17:03 jtb Exp $
|
||||||
|
|
||||||
|
--- 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
|
11
math/fftpack/patches/patch-ac
Normal file
11
math/fftpack/patches/patch-ac
Normal file
|
@ -0,0 +1,11 @@
|
||||||
|
$NetBSD: patch-ac,v 1.1.1.1 2000/11/28 02:17:03 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
|
11
math/fftpack/patches/patch-ad
Normal file
11
math/fftpack/patches/patch-ad
Normal file
|
@ -0,0 +1,11 @@
|
||||||
|
$NetBSD: patch-ad,v 1.1.1.1 2000/11/28 02:17:03 jtb Exp $
|
||||||
|
|
||||||
|
--- 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)
|
11
math/fftpack/patches/patch-ae
Normal file
11
math/fftpack/patches/patch-ae
Normal file
|
@ -0,0 +1,11 @@
|
||||||
|
$NetBSD: patch-ae,v 1.1.1.1 2000/11/28 02:17:03 jtb Exp $
|
||||||
|
|
||||||
|
--- 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)
|
11
math/fftpack/patches/patch-af
Normal file
11
math/fftpack/patches/patch-af
Normal file
|
@ -0,0 +1,11 @@
|
||||||
|
$NetBSD: patch-af,v 1.1.1.1 2000/11/28 02:17:03 jtb Exp $
|
||||||
|
|
||||||
|
--- 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
|
11
math/fftpack/patches/patch-ag
Normal file
11
math/fftpack/patches/patch-ag
Normal file
|
@ -0,0 +1,11 @@
|
||||||
|
$NetBSD: patch-ag,v 1.1.1.1 2000/11/28 02:17:03 jtb Exp $
|
||||||
|
|
||||||
|
--- 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
|
11
math/fftpack/patches/patch-ah
Normal file
11
math/fftpack/patches/patch-ah
Normal file
|
@ -0,0 +1,11 @@
|
||||||
|
$NetBSD: patch-ah,v 1.1.1.1 2000/11/28 02:17:03 jtb Exp $
|
||||||
|
|
||||||
|
--- 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
|
13
math/fftpack/patches/patch-ai
Normal file
13
math/fftpack/patches/patch-ai
Normal file
|
@ -0,0 +1,13 @@
|
||||||
|
$NetBSD: patch-ai,v 1.1.1.1 2000/11/28 02:17:03 jtb Exp $
|
||||||
|
|
||||||
|
--- 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
|
11
math/fftpack/patches/patch-aj
Normal file
11
math/fftpack/patches/patch-aj
Normal file
|
@ -0,0 +1,11 @@
|
||||||
|
$NetBSD: patch-aj,v 1.1.1.1 2000/11/28 02:17:02 jtb Exp $
|
||||||
|
|
||||||
|
--- 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
|
11
math/fftpack/patches/patch-ak
Normal file
11
math/fftpack/patches/patch-ak
Normal file
|
@ -0,0 +1,11 @@
|
||||||
|
$NetBSD: patch-ak,v 1.1.1.1 2000/11/28 02:17:03 jtb Exp $
|
||||||
|
|
||||||
|
--- 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
|
11
math/fftpack/patches/patch-al
Normal file
11
math/fftpack/patches/patch-al
Normal file
|
@ -0,0 +1,11 @@
|
||||||
|
$NetBSD: patch-al,v 1.1.1.1 2000/11/28 02:17:02 jtb Exp $
|
||||||
|
|
||||||
|
--- 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
|
11
math/fftpack/patches/patch-am
Normal file
11
math/fftpack/patches/patch-am
Normal file
|
@ -0,0 +1,11 @@
|
||||||
|
$NetBSD: patch-am,v 1.1.1.1 2000/11/28 02:17:02 jtb Exp $
|
||||||
|
|
||||||
|
--- 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
math/fftpack/pkg/COMMENT
Normal file
1
math/fftpack/pkg/COMMENT
Normal file
|
@ -0,0 +1 @@
|
||||||
|
Single precision Fortran FFT subroutines
|
3
math/fftpack/pkg/DESCR
Normal file
3
math/fftpack/pkg/DESCR
Normal file
|
@ -0,0 +1,3 @@
|
||||||
|
Fast Fourier Transform routines in FORTRAN 77 from Netlib. These are
|
||||||
|
single precision routines for both real and complex periodic
|
||||||
|
sequences. Double precision versions are in the dfftpack package.
|
6
math/fftpack/pkg/PLIST
Normal file
6
math/fftpack/pkg/PLIST
Normal file
|
@ -0,0 +1,6 @@
|
||||||
|
@comment $NetBSD: PLIST,v 1.1.1.1 2000/11/28 02:17:02 jtb Exp $
|
||||||
|
lib/libfftpack.a
|
||||||
|
lib/libfftpack.la
|
||||||
|
lib/libfftpack.so.0.0
|
||||||
|
share/doc/fftpack/doc
|
||||||
|
@dirrm share/doc/fftpack
|
Loading…
Reference in a new issue