/[MITgcm]/MITgcm/pkg/zonal_filt/FFTPACK.h
ViewVC logotype

Contents of /MITgcm/pkg/zonal_filt/FFTPACK.h

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph

Revision 1.1.2.1 - (show annotations) (download)
Wed Jan 24 16:56:07 2001 UTC (24 years ago) by adcroft
Branch: branch-atmos-merge
CVS Tags: branch-atmos-merge-freeze, branch-atmos-merge-zonalfilt
Changes since 1.1: +10 -0 lines
File MIME type: text/plain 
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 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