Symbol Description Uses
cost_ice_flag 10


File Line number Procedure Code
./pkg/ecco/cost_ice.F 105 COST_ICE 
         elseif ( cost_ice_flag .eq. 2 ) then
./pkg/ecco/cost_ice.F 139 COST_ICE 
         elseif ( cost_ice_flag .eq. 3 ) then
./pkg/ecco/cost_ice.F 155 COST_ICE 
         elseif ( cost_ice_flag .eq. 4 ) then
./pkg/ecco/cost_ice.F 170 COST_ICE 
         elseif ( cost_ice_flag .eq. 5 ) then
./pkg/ecco/cost_ice.F 189 COST_ICE 
         elseif ( cost_ice_flag .eq. 6 ) then
./pkg/ecco/cost_ice.F 92 COST_ICE 
         if ( cost_ice_flag .eq. 1 ) then
./pkg/ecco/ecco_readparms.F 215 ECCO_READPARMS 
        cost_ice_flag         =      1
./pkg/ecco/ecco_readparms.F 94 ECCO_READPARMS 
     &                   cost_ice_flag,
./pkg/ecco/ecco_cost.h 1051 NO PROCEDURE 
      common /ecco_cost_ice_i/ cost_ice_flag
./pkg/ecco/ecco_cost.h 1052 NO PROCEDURE 
      integer cost_ice_flag