Parent Directory
|
Revision Log
|
Revision Graph
|
Patch
revision 1.1 by adcroft, Wed Jan 24 16:56:07 2001 UTC | revision 1.2 by adcroft, Fri Feb 2 21:36:30 2001 UTC | |
---|---|---|
# | Line 0 | Line 1 |
1 | C $Header$ | |
2 | ||
3 | #include "CPP_OPTIONS.h" | |
4 | ||
5 | C Data structures/work-space for FFTPACK | |
6 | COMMON /FFTPACKSUPPORT/ FFTPACKWS1,FFTPACKWS2,FFTPACKWS3 | |
7 | C Real*8 FFTPACKWS(2*Nx+15,nSy) | |
8 | Real*8 FFTPACKWS1(Nx,nSy) | |
9 | Real*8 FFTPACKWS2(Nx,nSy) | |
10 | integer FFTPACKWS3(15,nSy) |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |