Symbol Description Uses
DIAGarray 12



File Line number Procedure Code
./pkg/seaice/seaice_advdiff.F 90 SEAICE_ADVDIFF
      _RL DIAGarray (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./pkg/seaice/seaice_tracer_phys.F 127 SEAICE_TRACER_PHYS
        DIAGarray(I,J,5+(iTr-1)*5) = HEFFpost*SItracer(i,j,bi,bj,iTr)
./pkg/seaice/seaice_tracer_phys.F 128 SEAICE_TRACER_PHYS
     &  +SItrBucket(i,j,bi,bj,iTr)-DIAGarray(I,J,5+(iTr-1)*5)
./pkg/seaice/seaice_tracer_phys.F 222 SEAICE_TRACER_PHYS
        DIAGarray(I,J,4+(iTr-1)*5) = - SItrBucket(i,j,bi,bj,iTr)
./pkg/seaice/seaice_tracer_phys.F 241 SEAICE_TRACER_PHYS
        DIAGarray(I,J,1+(iTr-1)*5) = SItracer(i,j,bi,bj,iTr)
./pkg/seaice/seaice_tracer_phys.F 242 SEAICE_TRACER_PHYS
        DIAGarray(I,J,2+(iTr-1)*5) = SItracer(i,j,bi,bj,iTr)*HEFFpost
./pkg/seaice/seaice_tracer_phys.F 245 SEAICE_TRACER_PHYS
          DIAGarray(I,J,3+(iTr-1)*5) = HSALT(i,j,bi,bj)/SEAICE_rhoIce
./pkg/seaice/seaice_tracer_phys.F 247 SEAICE_TRACER_PHYS
          DIAGarray(I,J,3+(iTr-1)*5) = HEFFpost
./pkg/seaice/seaice_tracer_phys.F 257 SEAICE_TRACER_PHYS
        DIAGarray(I,J,1+(iTr-1)*5) = SItracer(i,j,bi,bj,iTr)
./pkg/seaice/seaice_tracer_phys.F 258 SEAICE_TRACER_PHYS
        DIAGarray(I,J,2+(iTr-1)*5) = SItracer(i,j,bi,bj,iTr)*AREApost
./pkg/seaice/seaice_tracer_phys.F 51 SEAICE_TRACER_PHYS
      _RL DIAGarray     (1:sNx,1:sNy,Nr)
./pkg/seaice/seaice_tracer_phys.F 90 SEAICE_TRACER_PHYS
        DIAGarray(I,J,5+(iTr-1)*5) =