Symbol Description Uses
tmpVal 131



File Line number Procedure Code
./pkg/monitor/mon_advcfl.F 34 MON_ADVCFL
      _RL tmpVal,theMax
./pkg/monitor/mon_advcfl.F 43 MON_ADVCFL
           tmpVal=abs(U(I,J,K,bi,bj))*rDx(I,J,BI,BJ)*dT
./pkg/monitor/mon_advcfl.F 44 MON_ADVCFL
           theMax=max(theMax,tmpVal)
./pkg/debug/debug_fld_stats_rs.F 32 DEBUG_FLD_STATS_RS
      _RL tmpVal,rNumPnts
./pkg/debug/debug_fld_stats_rs.F 48 DEBUG_FLD_STATS_RS
           tmpVal=arr(I,J,K,bi,bj)
./pkg/debug/debug_fld_stats_rs.F 49 DEBUG_FLD_STATS_RS
           IF (tmpVal.NE.0. .AND. noPnts) THEN
./pkg/debug/debug_fld_stats_rs.F 50 DEBUG_FLD_STATS_RS
            theMin=tmpVal
./pkg/debug/debug_fld_stats_rs.F 51 DEBUG_FLD_STATS_RS
            theMax=tmpVal
./pkg/debug/debug_fld_stats_rs.F 54 DEBUG_FLD_STATS_RS
           IF (tmpVal.NE.0.) THEN
./pkg/debug/debug_fld_stats_rs.F 55 DEBUG_FLD_STATS_RS
            theMin=min(theMin,tmpVal)
./pkg/debug/debug_fld_stats_rs.F 56 DEBUG_FLD_STATS_RS
            theMax=max(theMax,tmpVal)
./pkg/debug/debug_fld_stats_rs.F 57 DEBUG_FLD_STATS_RS
            theMean=theMean+tmpVal
./pkg/debug/debug_fld_stats_rs.F 58 DEBUG_FLD_STATS_RS
            theVar=theVar+tmpVal**2
./pkg/debug/debug_fld_stats_rs.F 73 DEBUG_FLD_STATS_RS
      tmpVal=FLOAT(numPnts)
./pkg/debug/debug_fld_stats_rs.F 74 DEBUG_FLD_STATS_RS
      _GLOBAL_SUM_R8(tmpVal,myThid)
./pkg/debug/debug_fld_stats_rs.F 75 DEBUG_FLD_STATS_RS
      numPnts=INT(tmpVal+0.5)
./pkg/debug/debug_fld_stats_rs.F 77 DEBUG_FLD_STATS_RS
      IF (tmpVal.GT.0.) THEN
./pkg/debug/debug_fld_stats_rs.F 78 DEBUG_FLD_STATS_RS
       rNumPnts=1./tmpVal
./pkg/debug/debug_fld_stats_rs.F 87 DEBUG_FLD_STATS_RS
            tmpVal=arr(I,J,K,bi,bj)
./pkg/debug/debug_fld_stats_rs.F 88 DEBUG_FLD_STATS_RS
            IF (tmpVal.NE.0.) THEN
./pkg/debug/debug_fld_stats_rs.F 89 DEBUG_FLD_STATS_RS
             theSD=theSD+(tmpVal-theMean)**2
./pkg/debug/debug_fld_stats_rl.F 34 DEBUG_FLD_STATS_RL
      _RL tmpVal,rNumPnts
./pkg/debug/debug_fld_stats_rl.F 50 DEBUG_FLD_STATS_RL
           tmpVal=arr(I,J,K,bi,bj)
./pkg/debug/debug_fld_stats_rl.F 51 DEBUG_FLD_STATS_RL
           IF (tmpVal.NE.0. .AND. noPnts) THEN
./pkg/debug/debug_fld_stats_rl.F 52 DEBUG_FLD_STATS_RL
            theMin=tmpVal
./pkg/debug/debug_fld_stats_rl.F 53 DEBUG_FLD_STATS_RL
            theMax=tmpVal
./pkg/debug/debug_fld_stats_rl.F 56 DEBUG_FLD_STATS_RL
           IF (tmpVal.NE.0.) THEN
./pkg/debug/debug_fld_stats_rl.F 57 DEBUG_FLD_STATS_RL
            theMin=min(theMin,tmpVal)
./pkg/debug/debug_fld_stats_rl.F 58 DEBUG_FLD_STATS_RL
            theMax=max(theMax,tmpVal)
./pkg/debug/debug_fld_stats_rl.F 59 DEBUG_FLD_STATS_RL
            theMean=theMean+tmpVal
./pkg/debug/debug_fld_stats_rl.F 60 DEBUG_FLD_STATS_RL
            theVar=theVar+tmpVal**2
./pkg/debug/debug_fld_stats_rl.F 75 DEBUG_FLD_STATS_RL
      tmpVal=FLOAT(numPnts)
./pkg/debug/debug_fld_stats_rl.F 76 DEBUG_FLD_STATS_RL
      _GLOBAL_SUM_R8(tmpVal,myThid)
./pkg/debug/debug_fld_stats_rl.F 77 DEBUG_FLD_STATS_RL
      numPnts=INT(tmpVal+0.5)
./pkg/debug/debug_fld_stats_rl.F 79 DEBUG_FLD_STATS_RL
      IF (tmpVal.GT.0.) THEN
./pkg/debug/debug_fld_stats_rl.F 80 DEBUG_FLD_STATS_RL
       rNumPnts=1./tmpVal
./pkg/debug/debug_fld_stats_rl.F 89 DEBUG_FLD_STATS_RL
            tmpVal=arr(I,J,K,bi,bj)
./pkg/debug/debug_fld_stats_rl.F 90 DEBUG_FLD_STATS_RL
            IF (tmpVal.NE.0.) THEN
./pkg/debug/debug_fld_stats_rl.F 91 DEBUG_FLD_STATS_RL
             theSD=theSD+(tmpVal-theMean)**2
./verification/global_ocean_pressure/code/remove_mean_rl.F 34 REMOVE_MEAN_RL
      _RL tmpVal
./verification/global_ocean_pressure/code/remove_mean_rl.F 48 REMOVE_MEAN_RL
           tmpVal=arr(I,J,K,bi,bj)
./verification/global_ocean_pressure/code/remove_mean_rl.F 52 REMOVE_MEAN_RL
            theMean = theMean + tmpVol*tmpVal
./pkg/monitor/mon_ke.F 32 MON_KE
      _RL numPnts,theVol,tmpVal,tmpVol
./pkg/monitor/mon_ke.F 65 MON_KE
           tmpVal=0.25*(
./pkg/monitor/mon_ke.F 75 MON_KE
           volMeanTile= volMeanTile + tmpVal*drF(k)
./pkg/monitor/mon_ke.F 76 MON_KE
           tmpVal= tmpVal*recip_hFacC(i,j,k,bi,bj)*recip_rA(i,j,bi,bj)
./pkg/monitor/mon_ke.F 78 MON_KE
           theMax=max(theMax,tmpVal)
./pkg/monitor/mon_ke.F 79 MON_KE
           IF (tmpVal.NE.0.) THEN
./pkg/monitor/mon_ke.F 80 MON_KE
            meanTile=meanTile+tmpVal
./pkg/monitor/mon_ke.F 90 MON_KE
           tmpVal = 0.5 _d 0*Bo_surf(i,j,bi,bj)
./pkg/monitor/mon_ke.F 94 MON_KE
           tmpVal = tmpVal
./pkg/monitor/mon_ke.F 97 MON_KE
     &               + tmpVal*rA(i,j,bi,bj)*maskH(i,j,bi,bj)
./pkg/monitor/mon_stats_rl.F 100 MON_STATS_RL
      numPnts=NINT(tmpVal)
./pkg/monitor/mon_stats_rl.F 102 MON_STATS_RL
      IF (tmpVal.GT.0.) THEN
./pkg/monitor/mon_stats_rl.F 103 MON_STATS_RL
       rNumPnts=1. _d 0/tmpVal
./pkg/monitor/mon_stats_rl.F 123 MON_STATS_RL
            tmpVal=arr(I,J,K,bi,bj)
./pkg/monitor/mon_stats_rl.F 128 MON_STATS_RL
             theSDtile = theSDtile + tmpVol*(tmpVal-theMean)**2
./pkg/monitor/mon_stats_rl.F 38 MON_STATS_RL
      _RL tmpVal,rNumPnts
./pkg/monitor/mon_stats_rl.F 62 MON_STATS_RL
           tmpVal=arr(I,J,K,bi,bj)
./pkg/monitor/mon_stats_rl.F 64 MON_STATS_RL
            theMin=tmpVal
./pkg/monitor/mon_stats_rl.F 65 MON_STATS_RL
            theMax=tmpVal
./pkg/monitor/mon_stats_rl.F 69 MON_STATS_RL
            theMin=min(theMin,tmpVal)
./pkg/monitor/mon_stats_rl.F 70 MON_STATS_RL
            theMax=max(theMax,tmpVal)
./pkg/monitor/mon_stats_rl.F 72 MON_STATS_RL
     &         (arr(I+1,J,K,bi,bj)-tmpVal)*arrMask(I+1,J,K,bi,bj)
./pkg/monitor/mon_stats_rl.F 73 MON_STATS_RL
     &        +(arr(I-1,J,K,bi,bj)-tmpVal)*arrMask(I-1,J,K,bi,bj)
./pkg/monitor/mon_stats_rl.F 74 MON_STATS_RL
     &        +(arr(I,J+1,K,bi,bj)-tmpVal)*arrMask(I,J+1,K,bi,bj)
./pkg/monitor/mon_stats_rl.F 75 MON_STATS_RL
     &        +(arr(I,J-1,K,bi,bj)-tmpVal)*arrMask(I,J-1,K,bi,bj)
./pkg/monitor/mon_stats_rl.F 81 MON_STATS_RL
            theMeanTile = theMeanTile + tmpVol*tmpVal
./pkg/monitor/mon_stats_rl.F 82 MON_STATS_RL
            theVarTile = theVarTile   + tmpVol*tmpVal*tmpVal
./pkg/monitor/mon_stats_rl.F 98 MON_STATS_RL
      tmpVal=FLOAT(numPnts)
./pkg/monitor/mon_stats_rl.F 99 MON_STATS_RL
      _GLOBAL_SUM_R8(tmpVal,myThid)
./pkg/monitor/mon_stats_latbnd_rl.F 53 MON_STATS_LATBND_RL
      _RL tmpVal,rNumPnts
./pkg/monitor/mon_stats_latbnd_rl.F 81 MON_STATS_LATBND_RL
           tmpVal=arr(i,j,k,bi,bj)
./pkg/monitor/mon_stats_latbnd_rl.F 83 MON_STATS_LATBND_RL
            theMin(n)=tmpVal
./pkg/monitor/mon_stats_latbnd_rl.F 84 MON_STATS_LATBND_RL
            theMax(n)=tmpVal
./pkg/monitor/mon_stats_latbnd_rl.F 88 MON_STATS_LATBND_RL
            theMin(n)=MIN(theMin(n),tmpVal)
./pkg/monitor/mon_stats_latbnd_rl.F 89 MON_STATS_LATBND_RL
            theMax(n)=MAX(theMax(n),tmpVal)
./pkg/monitor/mon_stats_latbnd_rl.F 93 MON_STATS_LATBND_RL
            theMean(n)= theMean(n)+ tmpVol*tmpVal
./pkg/monitor/mon_stats_latbnd_rl.F 94 MON_STATS_LATBND_RL
            theVar(n) = theVar(n) + tmpVol*tmpVal*tmpVal
./pkg/monitor/mon_advcflw.F 34 MON_ADVCFLW
      _RL tmpVal,theMax
./pkg/monitor/mon_advcflw.F 43 MON_ADVCFLW
           tmpVal=abs(W(I,J,K,bi,bj))*rDz(K)*dT
./pkg/monitor/mon_advcflw.F 44 MON_ADVCFLW
           theMax=max(theMax,tmpVal)
./pkg/monitor/mon_stats_rs.F 100 MON_STATS_RS
             theSDtile=theSDtile+(tmpVal-theMean)**2
./pkg/monitor/mon_stats_rs.F 35 MON_STATS_RS
      _RL tmpVal,rNumPnts
./pkg/monitor/mon_stats_rs.F 54 MON_STATS_RS
           tmpVal=arr(I,J,K,bi,bj)
./pkg/monitor/mon_stats_rs.F 55 MON_STATS_RS
           IF (tmpVal.NE.0. .AND. noPnts) THEN
./pkg/monitor/mon_stats_rs.F 56 MON_STATS_RS
            theMin=tmpVal
./pkg/monitor/mon_stats_rs.F 57 MON_STATS_RS
            theMax=tmpVal
./pkg/monitor/mon_stats_rs.F 60 MON_STATS_RS
           IF (tmpVal.NE.0.) THEN
./pkg/monitor/mon_stats_rs.F 61 MON_STATS_RS
            theMin=min(theMin,tmpVal)
./pkg/monitor/mon_stats_rs.F 62 MON_STATS_RS
            theMax=max(theMax,tmpVal)
./pkg/monitor/mon_stats_rs.F 63 MON_STATS_RS
            theMeanTile=theMeanTile+tmpVal
./pkg/monitor/mon_stats_rs.F 64 MON_STATS_RS
            theVarTile=theVarTile+tmpVal*tmpVal
./pkg/monitor/mon_stats_rs.F 77 MON_STATS_RS
      tmpVal=FLOAT(numPnts)
./pkg/monitor/mon_stats_rs.F 78 MON_STATS_RS
      _GLOBAL_SUM_R8(tmpVal,myThid)
./pkg/monitor/mon_stats_rs.F 79 MON_STATS_RS
      numPnts=NINT(tmpVal)
./pkg/monitor/mon_stats_rs.F 81 MON_STATS_RS
      IF (tmpVal.GT.0.) THEN
./pkg/monitor/mon_stats_rs.F 82 MON_STATS_RS
       rNumPnts=1. _d 0/tmpVal
./pkg/monitor/mon_stats_rs.F 98 MON_STATS_RS
            tmpVal=arr(I,J,K,bi,bj)
./pkg/monitor/mon_stats_rs.F 99 MON_STATS_RS
            IF (tmpVal.NE.0.) THEN
./pkg/monitor/mon_advcflw2.F 36 MON_ADVCFLW2
      _RL tmpVal,theMax
./pkg/monitor/mon_advcflw2.F 45 MON_ADVCFLW2
           tmpVal=abs(W(I,J,K,bi,bj))*dT
./pkg/monitor/mon_advcflw2.F 48 MON_ADVCFLW2
           theMax=max(theMax,tmpVal)
./pkg/monitor/mon_vort3.F 281 MON_VORT3
            tmpVal = vort3(i,j)
./pkg/monitor/mon_vort3.F 286 MON_VORT3
            theMin = MIN(theMin,tmpVal)
./pkg/monitor/mon_vort3.F 287 MON_VORT3
            theMax = MAX(theMax,tmpVal)
./pkg/monitor/mon_vort3.F 289 MON_VORT3
            tmpVal = tmpVal + fCoriG(i,j,bi,bj)
./pkg/monitor/mon_vort3.F 290 MON_VORT3
            sumTile = sumTile + tmpAre*tmpVal
./pkg/monitor/mon_vort3.F 291 MON_VORT3
            sqsTile = sqsTile + tmpAre*tmpVal*tmpVal
./pkg/monitor/mon_vort3.F 293 MON_VORT3
            tmpVal = tmpVal / hFacZ(i,j)
./pkg/monitor/mon_vort3.F 295 MON_VORT3
            vSumTile = vSumTile + tmpVol*tmpVal
./pkg/monitor/mon_vort3.F 296 MON_VORT3
            vSqsTile = vSqsTile + tmpVol*tmpVal*tmpVal
./pkg/monitor/mon_vort3.F 37 MON_VORT3
      _RL theVol, theArea, tmpVal, tmpAre, tmpVol
./pkg/monitor/mon_surfcor.F 101 MON_SURFCOR
              tmpVal = salt(i,j,ks,bi,bj)
./pkg/monitor/mon_surfcor.F 105 MON_SURFCOR
     &         + rA(i,j,bi,bj)*wVel(i,j,ks,bi,bj)*tmpVal
./pkg/monitor/mon_surfcor.F 144 MON_SURFCOR
              tmpVal  = rStarDhCDt(i,j,bi,bj)*theta(i,j,k,bi,bj)
./pkg/monitor/mon_surfcor.F 145 MON_SURFCOR
              vT_Mean = vT_Mean + tmpVol*tmpVal
./pkg/monitor/mon_surfcor.F 150 MON_SURFCOR
     &                                + tmpVol*tmpVal*conv_th2Heat
./pkg/monitor/mon_surfcor.F 56 MON_SURFCOR
      _RL tmpVol, tmpVal, conv_th2Heat, ddPI
./pkg/monitor/mon_surfcor.F 81 MON_SURFCOR
             tmpVal =
./pkg/monitor/mon_surfcor.F 83 MON_SURFCOR
             wT_Tile = wT_Tile + tmpVal
./pkg/monitor/mon_surfcor.F 89 MON_SURFCOR
     &                 + tmpVal*atm_cp*((rC(ks)/atm_po)**atm_kappa)