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 | #ifdef ALLOW_ZONAL_FILT | |
4 | ||
5 | C Amplitide factor as function of mode number and latitude (U,T points) | |
6 | COMMON /ZONAL_FFT/ ampFactor,ampFactorV | |
7 | C _RL ampFactor( Nx, 1-Oly:sNy+Oly, nSx, nSy ) | |
8 | C _RL ampFactorV( Nx, 1-Oly:sNy+Oly, nSx, nSy ) | |
9 | _RL ampFactor( 1-Olx:sNx+Olx, 1-Oly:sNy+Oly, nSx, nSy ) | |
10 | _RL ampFactorV( 1-Olx:sNx+Olx, 1-Oly:sNy+Oly, nSx, nSy ) | |
11 | ||
12 | #endif /* ZONAL_FILT */ |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |