Symbol Description Uses
kmaxdepth 13


File Line number Procedure Code
./pkg/seaice/seaice_cost_export.F 31 SEAICE_COST_EXPORT 
      integer    kmaxdepth
./pkg/seaice/seaice_cost_export.F 43 SEAICE_COST_EXPORT 
      parameter ( kmaxdepth = 1 )
./pkg/seaice/seaice_cost_export.F 50 SEAICE_COST_EXPORT 
          do k = 1, kmaxdepth
./pkg/cost/cost_atlantic_heat.F 120 COST_ATLANTIC_HEAT 
           if ( k .LE. kmaxdepth .AND. countV(k) .NE. 0) then
./pkg/cost/cost_atlantic_heat.F 125 COST_ATLANTIC_HEAT 
           if ( k .LE. kmaxdepth .AND. countTV(k) .NE. 0) then
./pkg/cost/cost_atlantic_heat.F 172 COST_ATLANTIC_HEAT 
           if ( k .LE. kmaxdepth .AND.
./pkg/cost/cost_atlantic_heat.F 31 COST_ATLANTIC_HEAT 
      integer    kmaxdepth
./pkg/cost/cost_atlantic_heat.F 49 COST_ATLANTIC_HEAT 
      parameter ( kmaxdepth = 8 )
./pkg/cost/cost_atlantic_heat.F 51 COST_ATLANTIC_HEAT 
      parameter ( kmaxdepth = 14 )
./pkg/cost/cost_atlantic_heat.F 77 COST_ATLANTIC_HEAT 
          do k = 1, kmaxdepth
./pkg/cost/cost_vector.F 31 COST_VECTOR 
      integer    kmaxdepth
./pkg/cost/cost_vector.F 43 COST_VECTOR 
      parameter ( kmaxdepth = 15 )
./pkg/cost/cost_vector.F 68 COST_VECTOR 
            do k = 1, kmaxdepth