| Symbol | Description | Uses |
| switch | 7 |
| File | Line number | Procedure | Code |
| ./pkg/cal/cal_addtime.F | 200 | CAL_ADDTIME |
switch = (mi-1)/nmonthyear |
| ./pkg/cal/cal_addtime.F | 201 | CAL_ADDTIME |
yi = yi + switch |
| ./pkg/cal/cal_addtime.F | 203 | CAL_ADDTIME |
if (switch .eq. 1) li = cal_IsLeap( yi, myThid ) |
| ./pkg/cal/cal_addtime.F | 219 | CAL_ADDTIME |
switch = mi/nmonthyear |
| ./pkg/cal/cal_addtime.F | 220 | CAL_ADDTIME |
yi = yi - switch |
| ./pkg/cal/cal_addtime.F | 221 | CAL_ADDTIME |
if (switch .eq. 1) li = cal_IsLeap( yi, myThid ) |
| ./pkg/cal/cal_addtime.F | 62 | CAL_ADDTIME |
INTEGER switch |