| File |
Line number |
Procedure |
Code |
|
./pkg/diagnostics/DIAGNOSTICS_CALC.h |
33 |
NO PROCEDURE |
INTEGER jPsi0(nSx,nSy) |
|
./pkg/diagnostics/DIAGNOSTICS_CALC.h |
40 |
NO PROCEDURE |
& iPsi0, jPsi0 |
|
./pkg/diagnostics/diag_calc_psivel.F |
10 |
DIAG_CALC_PSIVEL |
I k, iPsi0, jPsi0, uTrans, vTrans, |
|
./pkg/diagnostics/diag_calc_psivel.F |
249 |
DIAG_CALC_PSIVEL |
IF ( iPsi0(bi,bj)*jPsi0(bi,bj).GT.0 ) |
|
./pkg/diagnostics/diag_calc_psivel.F |
250 |
DIAG_CALC_PSIVEL |
& offSet = -psiVel(iPsi0(bi,bj),jPsi0(bi,bj),bi,bj) |
|
./pkg/diagnostics/diag_calc_psivel.F |
47 |
DIAG_CALC_PSIVEL |
INTEGER jPsi0(nSx,nSy) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
257 |
DIAGNOSTICS_CALC_PHIVEL |
I k, iPsi0, jPsi0, uTrans, vTrans, |
|
./pkg/diagnostics/diagnostics_set_calc.F |
122 |
DIAGNOSTICS_SET_CALC |
jPsi0(bi,bj) = 0 |
|
./pkg/diagnostics/diagnostics_set_calc.F |
132 |
DIAGNOSTICS_SET_CALC |
xyLoc = xy0 + iPsi0(bi,bj) + (jPsi0(bi,bj)-1)*xLine |
|
./pkg/diagnostics/diagnostics_set_calc.F |
137 |
DIAGNOSTICS_SET_CALC |
& ' ; i,j=',iPsi0(bi,bj),jPsi0(bi,bj),' ; ijLoc=',xyLoc |
|
./pkg/diagnostics/diagnostics_set_calc.F |
141 |
DIAGNOSTICS_SET_CALC |
jPsi0(bi,bj) = 0 |
|
./pkg/diagnostics/diagnostics_set_calc.F |
145 |
DIAGNOSTICS_SET_CALC |
& ' ; i,j=',iPsi0(bi,bj),jPsi0(bi,bj),' ; ijLoc=',xyLoc |
|
./pkg/diagnostics/diagnostics_set_calc.F |
48 |
DIAGNOSTICS_SET_CALC |
jPsi0(bi,bj) = 0 |
|
./pkg/diagnostics/diagnostics_set_calc.F |
75 |
DIAGNOSTICS_SET_CALC |
jPsi0(bi,bj) = 0 |
|
./pkg/diagnostics/diagnostics_set_calc.F |
92 |
DIAGNOSTICS_SET_CALC |
jPsi0(bi,bj) = j |