| File |
Line number |
Procedure |
Code |
|
./pkg/exf/exf_interp_uv.F |
148 |
EXF_INTERP_UV |
O arrVin, |
|
./pkg/exf/exf_interp_uv.F |
18 |
EXF_INTERP_UV |
O arrUout, arrVout, arrUin, arrVin, |
|
./pkg/exf/exf_interp_uv.F |
221 |
EXF_INTERP_UV |
arrVin( 0,j) = arrVin(nxIn ,j) |
|
./pkg/exf/exf_interp_uv.F |
222 |
EXF_INTERP_UV |
arrVin(-1,j) = arrVin(nxIn-1,j) |
|
./pkg/exf/exf_interp_uv.F |
223 |
EXF_INTERP_UV |
arrVin(nxIn+1,j) = arrVin(1,j) |
|
./pkg/exf/exf_interp_uv.F |
224 |
EXF_INTERP_UV |
arrVin(nxIn+2,j) = arrVin(2,j) |
|
./pkg/exf/exf_interp_uv.F |
233 |
EXF_INTERP_UV |
arrVin( 0,j) = arrVin(1,j) |
|
./pkg/exf/exf_interp_uv.F |
234 |
EXF_INTERP_UV |
arrVin(-1,j) = arrVin(1,j) |
|
./pkg/exf/exf_interp_uv.F |
235 |
EXF_INTERP_UV |
arrVin(nxIn+1,j) = arrVin(nxIn,j) |
|
./pkg/exf/exf_interp_uv.F |
236 |
EXF_INTERP_UV |
arrVin(nxIn+2,j) = arrVin(nxIn,j) |
|
./pkg/exf/exf_interp_uv.F |
250 |
EXF_INTERP_UV |
arrVin(i,j) = symSign*arrVin(i+nxd2,k) |
|
./pkg/exf/exf_interp_uv.F |
254 |
EXF_INTERP_UV |
arrVin(i+nxd2,j) = symSign*arrVin(i,k) |
|
./pkg/exf/exf_interp_uv.F |
264 |
EXF_INTERP_UV |
arrVin(i,j) = arrVin(i,k) |
|
./pkg/exf/exf_interp_uv.F |
298 |
EXF_INTERP_UV |
& + ( csLon(i)*arrUin(i,j) - pSign*snLon(i)*arrVin(i,j) ) |
|
./pkg/exf/exf_interp_uv.F |
300 |
EXF_INTERP_UV |
& + ( pSign*snLon(i)*arrUin(i,j) + csLon(i)*arrVin(i,j) ) |
|
./pkg/exf/exf_interp_uv.F |
307 |
EXF_INTERP_UV |
arrVin(i,j) = -pSign*snLon(i)*poleU + csLon(i)*poleV |
|
./pkg/exf/exf_interp_uv.F |
326 |
EXF_INTERP_UV |
arrVin(i,j) = arrVin(i,j) * edgeFac |
|
./pkg/exf/exf_interp_uv.F |
327 |
EXF_INTERP_UV |
& + arrVin(i,k) * poleFac |
|
./pkg/exf/exf_interp_uv.F |
487 |
EXF_INTERP_UV |
I arrVin, |
|
./pkg/exf/exf_interp_uv.F |
70 |
EXF_INTERP_UV |
_RL arrVin ( -1:nxIn+2, -1:nyIn+2 ) |
|
./pkg/exf/exf_interp_uv.F |
97 |
EXF_INTERP_UV |
_RL arrVin( -1:nxIn+2, -1:nyIn+2 ) |