Symbol Description Uses
ipCt 4


File Line number Procedure Code
./pkg/diagnostics/diagnostics_utils.F 101 GETDIAG 
     &                    / qdiag(i,j,ipCt,bi,bj)
./pkg/diagnostics/diagnostics_utils.F 58 GETDIAG 
      INTEGER i, j, ipnt,ipCt
./pkg/diagnostics/diagnostics_utils.F 96 GETDIAG 
          ipCt = im + levCt - 1
./pkg/diagnostics/diagnostics_utils.F 99 GETDIAG 
              IF ( qdiag(i,j,ipCt,bi,bj) .NE. 0. ) THEN