| 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 |