| Symbol | Description | Uses |
| ncep_yr | 6 |
| File | Line number | Procedure | Code |
| ./pkg/atm2d/forward_step_atm2d.F | 102 | FORWARD_STEP_ATM2D |
WRITE(ncep_yr,'(I4)') (NINT(RAND()*60.0+0.5) + 1947) |
| ./pkg/atm2d/forward_step_atm2d.F | 103 | FORWARD_STEP_ATM2D |
PRINT *,'Using NCEP wind variations from year: ',ncep_yr |
| ./pkg/atm2d/forward_step_atm2d.F | 105 | FORWARD_STEP_ATM2D |
& FILE='ncep_taux_variations_'//ncep_yr//'.bin',STATUS='old', |
| ./pkg/atm2d/forward_step_atm2d.F | 109 | FORWARD_STEP_ATM2D |
& FILE='ncep_tauy_variations_'//ncep_yr//'.bin',STATUS='old', |
| ./pkg/atm2d/forward_step_atm2d.F | 113 | FORWARD_STEP_ATM2D |
& FILE='ncep_speed_variations_'//ncep_yr//'.bin',STATUS='old', |
| ./pkg/atm2d/forward_step_atm2d.F | 71 | FORWARD_STEP_ATM2D |
CHARACTER *4 ncep_yr |