Symbol | Description | Uses |
switch | 7 |
File | Line number | Procedure | Code |
./pkg/cal/cal_addtime.F | 197 | CAL_ADDTIME |
switch = (mi-1)/nmonthyear |
./pkg/cal/cal_addtime.F | 198 | CAL_ADDTIME |
yi = yi + switch |
./pkg/cal/cal_addtime.F | 200 | CAL_ADDTIME |
if (switch .eq. 1) li = cal_IsLeap( yi, mythid ) |
./pkg/cal/cal_addtime.F | 216 | CAL_ADDTIME |
switch = mi/nmonthyear |
./pkg/cal/cal_addtime.F | 217 | CAL_ADDTIME |
yi = yi - switch |
./pkg/cal/cal_addtime.F | 218 | CAL_ADDTIME |
if (switch .eq. 1) li = cal_IsLeap( yi, mythid ) |
./pkg/cal/cal_addtime.F | 67 | CAL_ADDTIME |
integer switch |