Parent Directory
|
Revision Log
|
Revision Graph
Packaged zonal filter code: - Like the Shapiro code, this is quasi-packaged (it uses the main namelist to set it's 3 parameters) - FFTPACK is included in pkg/zonal_filt
| 1 | adcroft | 1.1.2.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 |