Symbol | Description | Uses |
ipnt | 6 |
File | Line number | Procedure | Code |
./pkg/diagnostics/diagnostics_utils.F | 48 | GETDIAG |
INTEGER i, j, ipnt,ipCt |
./pkg/diagnostics/diagnostics_utils.F | 59 | GETDIAG |
ipnt = ip + lev - 1 |
./pkg/diagnostics/diagnostics_utils.F | 65 | GETDIAG |
IF ( qdiag(i,j,ipnt,bi,bj) .LE. undef ) THEN |
./pkg/diagnostics/diagnostics_utils.F | 66 | GETDIAG |
qtmp(i,j) = qdiag(i,j,ipnt,bi,bj)*factor |
./pkg/diagnostics/diagnostics_utils.F | 76 | GETDIAG |
ipnt = ip + lev - 1 |
./pkg/diagnostics/diagnostics_utils.F | 82 | GETDIAG |
qtmp(i,j) = qdiag(i,j,ipnt,bi,bj) |