File |
Line number |
Procedure |
Code |
./pkg/gmredi/gmredi_calc_tensor.F |
154 |
GMREDI_CALC_TENSOR |
dSigmaDy(i,j) = 0. _d 0 |
./pkg/gmredi/gmredi_calc_tensor.F |
183 |
GMREDI_CALC_TENSOR |
dSigmaDy(i,j)=op25*( sigmaY( i ,j+1,k-1) +sigmaY(i,j,k-1) |
./pkg/gmredi/gmredi_calc_tensor.F |
201 |
GMREDI_CALC_TENSOR |
I dSigmaDx, dSigmaDy, |
./pkg/gmredi/gmredi_calc_tensor.F |
331 |
GMREDI_CALC_TENSOR |
dSigmaDy(i,j)=op25*( sigmaY(i-1,j+1,k) +sigmaY(i,j+1,k) |
./pkg/gmredi/gmredi_calc_tensor.F |
352 |
GMREDI_CALC_TENSOR |
I dSigmaDx, dSigmaDy, |
./pkg/gmredi/gmredi_calc_tensor.F |
415 |
GMREDI_CALC_TENSOR |
dSigmaDy(i,j)=sigmaY(i,j,k) |
./pkg/gmredi/gmredi_calc_tensor.F |
434 |
GMREDI_CALC_TENSOR |
I dSigmaDx, dSigmaDy, |
./pkg/gmredi/gmredi_calc_tensor.F |
48 |
GMREDI_CALC_TENSOR |
_RL dSigmaDy(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_slope_limit.F |
108 |
GMREDI_SLOPE_LIMIT |
& dSigmaDy(i,j)*dSigmaDy(i,j) |
./pkg/gmredi/gmredi_slope_limit.F |
11 |
GMREDI_SLOPE_LIMIT |
I dSigmaDx, dSigmaDy, |
./pkg/gmredi/gmredi_slope_limit.F |
146 |
GMREDI_SLOPE_LIMIT |
SlopeY(i,j)=-dSigmaDy(i,j)*dRdSigmaLtd(i,j) |
./pkg/gmredi/gmredi_slope_limit.F |
183 |
GMREDI_SLOPE_LIMIT |
& + dSigmaDy(i,j)*dSigmaDy(i,j) |
./pkg/gmredi/gmredi_slope_limit.F |
191 |
GMREDI_SLOPE_LIMIT |
& +dSigmaDy(i,j)*dSigmaDy(i,j))*dRdSigmaLtd(i,j) |
./pkg/gmredi/gmredi_slope_limit.F |
194 |
GMREDI_SLOPE_LIMIT |
SlopeY(i,j)=-dSigmaDy(i,j) |
./pkg/gmredi/gmredi_slope_limit.F |
252 |
GMREDI_SLOPE_LIMIT |
IF ( dSigmaDy(i,j) .NE. 0. ) THEN |
./pkg/gmredi/gmredi_slope_limit.F |
253 |
GMREDI_SLOPE_LIMIT |
SlopeY(i,j) = SIGN(Small_taper,dSigmaDy(i,j)) |
./pkg/gmredi/gmredi_slope_limit.F |
260 |
GMREDI_SLOPE_LIMIT |
SlopeY(i,j)=-dSigmaDy(i,j)*dRdSigmaLtd(i,j) |
./pkg/gmredi/gmredi_slope_limit.F |
51 |
GMREDI_SLOPE_LIMIT |
_RL dSigmaDy(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |