| Symbol | Description | Uses |
| jsec | 6 |
| File | Line number | Procedure | Code |
| ./pkg/cost/cost_vector.F | 28 | COST_VECTOR |
integer isecbeg , isecend , jsec |
| ./pkg/cost/cost_vector.F | 40 | COST_VECTOR |
parameter( isecbeg = 70, isecend = 90, jsec = 27 ) |
| ./pkg/cost/cost_vector.F | 60 | COST_VECTOR |
if (jg .eq. jsec) then |
| ./pkg/cost/cost_atlantic_heat.F | 27 | COST_ATLANTIC_HEAT |
integer isecbeg , isecend , jsec |
| ./pkg/cost/cost_atlantic_heat.F | 41 | COST_ATLANTIC_HEAT |
parameter( isecbeg = 69, isecend = 87, jsec = 28 ) |
| ./pkg/cost/cost_atlantic_heat.F | 87 | COST_ATLANTIC_HEAT |
if (jg .eq. jsec) then |