1 |
C $Header$ |
C $Header$ |
2 |
C $Name$ |
C $Name$ |
3 |
|
|
4 |
#include "CPP_OPTIONS.h" |
#include "ZONAL_FILT_OPTIONS.h" |
5 |
|
|
6 |
|
#ifdef ALLOW_ZONAL_FILT |
7 |
|
|
8 |
C Data structures/work-space for FFTPACK |
C Data structures/work-space for FFTPACK |
9 |
COMMON /FFTPACKSUPPORT/ FFTPACKWS1,FFTPACKWS2,FFTPACKWS3 |
COMMON /FFTPACKSUPPORT/ FFTPACKWS1,FFTPACKWS2,FFTPACKWS3 |
11 |
Real*8 FFTPACKWS1(Nx,nSy) |
Real*8 FFTPACKWS1(Nx,nSy) |
12 |
Real*8 FFTPACKWS2(Nx,nSy) |
Real*8 FFTPACKWS2(Nx,nSy) |
13 |
integer FFTPACKWS3(15,nSy) |
integer FFTPACKWS3(15,nSy) |
14 |
|
|
15 |
|
#endif /* ALLOW_ZONAL_FILT */ |