File |
Line number |
Procedure |
Code |
./pkg/atm2d/atm2d_write_pickup.F |
52 |
ATM2D_WRITE_PICKUP |
LOGICAL permCheckPoint, tempCheckPoint |
./pkg/atm2d/atm2d_write_pickup.F |
56 |
ATM2D_WRITE_PICKUP |
tempCheckPoint = .FALSE. |
./pkg/atm2d/atm2d_write_pickup.F |
59 |
ATM2D_WRITE_PICKUP |
tempCheckPoint= |
./pkg/atm2d/atm2d_write_pickup.F |
68 |
ATM2D_WRITE_PICKUP |
U tempCheckPoint, |
./pkg/atm2d/atm2d_write_pickup.F |
74 |
ATM2D_WRITE_PICKUP |
& ( .NOT.modelEnd .AND. (permCheckPoint.OR.tempCheckPoint) ) |
./pkg/atm2d/atm2d_write_pickup.F |
76 |
ATM2D_WRITE_PICKUP |
& ( modelEnd .AND. .NOT.(permCheckPoint.OR.tempCheckPoint) ) |
./pkg/atm2d/atm2d_write_pickup.F |
79 |
ATM2D_WRITE_PICKUP |
IF (tempCheckPoint) !toggle was done prematurely... |
./pkg/atm2d/atm2d_write_pickup.F |
85 |
ATM2D_WRITE_PICKUP |
IF (tempCheckPoint) !note this works for A/B chpt only |