Symbol Description Uses
isec 3


File Line number Procedure Code
./pkg/cost/cost_atlantic_heat.F 131 COST_ATLANTIC_HEAT 
         if (ig .eq. isec) then
./pkg/cost/cost_atlantic_heat.F 28 COST_ATLANTIC_HEAT 
      integer    jsecbeg      , jsecend      , isec
./pkg/cost/cost_atlantic_heat.F 43 COST_ATLANTIC_HEAT 
      parameter( jsecbeg = 10, jsecend = 27, isec = 59 )