Symbol Description Uses
ipCt 4


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