File |
Line number |
Procedure |
Code |
./pkg/seaice/seaice_cost_export.F |
30 |
SEAICE_COST_EXPORT |
integer jsecbeg , jsecend , isec |
./pkg/seaice/seaice_cost_export.F |
37 |
SEAICE_COST_EXPORT |
parameter ( isec = 74, jsecbeg = 60, jsecend = 89 ) |
./pkg/seaice/seaice_cost_export.F |
39 |
SEAICE_COST_EXPORT |
parameter ( isec = 202, jsecbeg = 236, jsecend = 242 ) |
./pkg/seaice/seaice_cost_export.F |
41 |
SEAICE_COST_EXPORT |
parameter ( isec = 1, jsecbeg = 1, jsecend = 1) |
./pkg/seaice/seaice_cost_export.F |
49 |
SEAICE_COST_EXPORT |
if (ig .eq. isec) then |
./pkg/cost/cost_atlantic_heat.F |
142 |
COST_ATLANTIC_HEAT |
if (ig .eq. isec) then |
./pkg/cost/cost_atlantic_heat.F |
30 |
COST_ATLANTIC_HEAT |
integer jsecbeg , jsecend , isec |
./pkg/cost/cost_atlantic_heat.F |
47 |
COST_ATLANTIC_HEAT |
parameter( jsecbeg = 10, jsecend = 27, isec = 59 ) |