Symbol Description Uses
trHeatW 4



File Line number Procedure Code
./pkg/ecco/ecco_phys.F 183 ECCO_PHYS
                trHeatW(i,j,k)=0. _d 0
./pkg/ecco/ecco_phys.F 202 ECCO_PHYS
                trHeatW(i,j,k) = trVolW(i,j,k)
./pkg/ecco/ecco_phys.F 217 ECCO_PHYS
                trHeat(i,j,k,bi,bj)=trHeatW(i,j,k)+trHeatS(i,j,k)
./pkg/ecco/ecco_phys.F 53 ECCO_PHYS
      _RL trHeatW(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)