Symbol Description Uses
tmpy 5


File Line number Procedure Code
./pkg/ecco/cost_obcsvol.F 294 COST_OBCSVOL 
                  tmpy = tmpfldyz(j,1,bi,bj)
./pkg/ecco/cost_obcsvol.F 297 COST_OBCSVOL 
                    fctile = fctile + tmpy* drF(k) *dyg(i+1,j,bi,bj)
./pkg/ecco/cost_obcsvol.F 337 COST_OBCSVOL 
                  tmpy = tmpfldyz(j,1,bi,bj)
./pkg/ecco/cost_obcsvol.F 340 COST_OBCSVOL 
                    fctile = fctile - tmpy* drF(k) *dyg(i,j,bi,bj)
./pkg/ecco/cost_obcsvol.F 69 COST_OBCSVOL 
      _RL tmpy