Symbol Description Uses
const1 5


File Line number Procedure Code
./pkg/ecco/cost_gencost_seaicev4.F 422 GET_EXCONC_DECONC 
      _RL const1,const2
./pkg/ecco/cost_gencost_seaicev4.F 435 GET_EXCONC_DECONC 
      const1=HeatCapacity_Cp*rhoNil*drF(1)
./pkg/ecco/cost_gencost_seaicev4.F 477 GET_EXCONC_DECONC 
     &          (deconcbar(i,j,k,bi,bj)-SEAICE_freeze)*const1
./pkg/ecco/cost_gencost_seaicev4.F 512 GET_EXCONC_DECONC 
     &        ( (deconcbar(i,j,k,bi,bj)-SEAICE_freeze)*const1
./pkg/ecco/cost_gencost_seaicev4.F 518 GET_EXCONC_DECONC 
     &           const2 ) - (epsilonTemp*const1)