| Symbol | Description | Uses |
| MIDM | 8 |
| File | Line number | Procedure | Code |
| ./pkg/fizhi/update_earth_exports.F | 776 | GETLGR |
MIDM = DAYS(K1)/2 + 1 |
| ./pkg/fizhi/update_earth_exports.F | 780 | GETLGR |
MIDM = MIDMON |
| ./pkg/fizhi/update_earth_exports.F | 785 | GETLGR |
FAC = (float(ID -MIDM)*DAYLEN + SEC) / |
| ./pkg/fizhi/update_earth_exports.F | 786 | GETLGR |
* (float(MIDP-MIDM)*DAYLEN ) |