| File |
Line number |
Procedure |
Code |
|
./pkg/zonal_filt/ZONAL_FILT.h |
38 |
NO PROCEDURE |
COMMON /ZONAL_FFT/ ampFactor,ampFactorV |
|
./pkg/zonal_filt/ZONAL_FILT.h |
41 |
NO PROCEDURE |
_RL ampFactor( 1-Olx:sNx+Olx, 1-Oly:sNy+Oly, nSx, nSy ) |
|
./pkg/zonal_filt/zonal_filt_init.F |
107 |
ZONAL_FILT_INIT |
ampFactor(Nx,j,bi,bj) = ampfact( yC(1,j,bi,bj) , i ) |
|
./pkg/zonal_filt/zonal_filt_init.F |
110 |
ZONAL_FILT_INIT |
ampFactor(Nx,j,bi,bj) = 0. |
|
./pkg/zonal_filt/zonal_filt_init.F |
120 |
ZONAL_FILT_INIT |
CALL WRITE_REC_XY_RL( 'ampFactor', ampFactor, 1, 0, myThid ) |
|
./pkg/zonal_filt/zonal_filt_init.F |
94 |
ZONAL_FILT_INIT |
ampFactor(1,j,bi,bj) = oneRL |
|
./pkg/zonal_filt/zonal_filt_init.F |
97 |
ZONAL_FILT_INIT |
ampFactor(2*i,j,bi,bj) = ampfact( yC(1,j,bi,bj) , I ) |
|
./pkg/zonal_filt/zonal_filt_init.F |
99 |
ZONAL_FILT_INIT |
ampFactor(2*I+1,j,bi,bj) = ampFactor(2*i,j,bi,bj) |
|
./pkg/zonal_filt/zonal_filt_nofill.F |
59 |
ZONAL_FILT_NOFILL |
phi(i)=phi(i)*ampFactor(i,j,bi,bj)/float(Nx) |
|
./pkg/zonal_filt/zonal_filter.F |
79 |
ZONAL_FILTER |
phi(i)=phi(i)*ampFactor(i,j,bi,bj)/float(Nx) |