Symbol Description Uses
tmpy 5


File Line number Procedure Code
./pkg/ecco/cost_obcsvol.F 305 COST_OBCSVOL 
                  tmpy = tmpfldyz(j,1,bi,bj)
./pkg/ecco/cost_obcsvol.F 308 COST_OBCSVOL 
                    fctile = fctile + tmpy* drF(k) *dyg(i+1,j,bi,bj)
./pkg/ecco/cost_obcsvol.F 348 COST_OBCSVOL 
                  tmpy = tmpfldyz(j,1,bi,bj)
./pkg/ecco/cost_obcsvol.F 351 COST_OBCSVOL 
                    fctile = fctile - tmpy* drF(k) *dyg(i,j,bi,bj)
./pkg/ecco/cost_obcsvol.F 80 COST_OBCSVOL 
      _RL tmpy