| Symbol | Description | Uses |
| jdofmhr | 9 |
| File | Line number | Procedure | Code |
| ./pkg/atm2d/forward_step_atm2d.F | 136 | FORWARD_STEP_ATM2D |
IF (inyr.EQ.jdofmhr(monid-1)+dtcouple) THEN !do this block month start |
| ./pkg/atm2d/forward_step_atm2d.F | 226 | FORWARD_STEP_ATM2D |
IF (inyr.EQ.jdofmhr(monid)) THEN !do block if month-end |
| ./pkg/atm2d/forward_step_atm2d.F | 294 | FORWARD_STEP_ATM2D |
IF (inyr .EQ. jdofmhr(12)) THEN ! do this block at year-end |
| ./pkg/atm2d/forward_step_atm2d.F | 46 | FORWARD_STEP_ATM2D |
INTEGER jdofmhr(0:12) |
| ./pkg/atm2d/forward_step_atm2d.F | 47 | FORWARD_STEP_ATM2D |
DATA jdofmhr/0,744,1416,2160,2880,3624,4344,5088, |
| ./pkg/atm2d/forward_step_atm2d.F | 77 | FORWARD_STEP_ATM2D |
IF (inyr .EQ. 0) inyr=jdofmhr(12) |
| ./pkg/atm2d/forward_step_atm2d.F | 79 | FORWARD_STEP_ATM2D |
IF ((inyr.GT.jdofmhr(mn-1)).AND.(inyr.LE.jdofmhr(mn))) monid=mn |
| ./pkg/atm2d/forward_step_atm2d.F | 82 | FORWARD_STEP_ATM2D |
dayid= int((inyr-dtcouple-jdofmhr(monid-1))/24.0) +1 |