File |
Line number |
Procedure |
Code |
./pkg/zonal_filt/zonal_filt_init.F |
51 |
ZONAL_FILT_INIT |
_RS ampfact,Y |
./pkg/zonal_filt/zonal_filt_init.F |
52 |
ZONAL_FILT_INIT |
ampfact(Y,I) = min( one, |
./pkg/zonal_filt/zonal_filt_init.F |
72 |
ZONAL_FILT_INIT |
ampFactor(2*I,J,bi,bj) = ampfact( yC(1,J,bi,bj) , I ) |
./pkg/zonal_filt/zonal_filt_init.F |
75 |
ZONAL_FILT_INIT |
ampFactorV(2*I,J,bi,bj) = ampfact( yG(1,J,bi,bj) , I ) |
./pkg/zonal_filt/zonal_filt_init.F |
82 |
ZONAL_FILT_INIT |
ampFactor(Nx,J,bi,bj) = ampfact( yC(1,J,bi,bj) , I ) |
./pkg/zonal_filt/zonal_filt_init.F |
83 |
ZONAL_FILT_INIT |
ampFactorV(Nx,J,bi,bj) = ampfact( yG(1,J,bi,bj) , I ) |