| Symbol | Description | Uses |
| jx | 7 |
| File | Line number | Procedure | Code |
| ./pkg/diagnostics/diag_calc_psivel.F | 185 | DIAG_CALC_PSIVEL |
jx = 0 |
| ./pkg/diagnostics/diag_calc_psivel.F | 188 | DIAG_CALC_PSIVEL |
IF ( kPsi(i,j) .AND. jx.EQ.0 ) THEN |
| ./pkg/diagnostics/diag_calc_psivel.F | 190 | DIAG_CALC_PSIVEL |
jx = j |
| ./pkg/diagnostics/diag_calc_psivel.F | 194 | DIAG_CALC_PSIVEL |
IF ( jx.NE.0 ) dPsiX (bi,bj) = psiVel(ix,jx,bi,bj) |
| ./pkg/diagnostics/diag_calc_psivel.F | 210 | DIAG_CALC_PSIVEL |
& ' ; ix,jx=', ix,jx, ' ; iy,jy=', iy,jy |
| ./pkg/diagnostics/diag_calc_psivel.F | 73 | DIAG_CALC_PSIVEL |
INTEGER is, js, ix, jx, iy, jy, ijCnt |