54 |
CALL UPDATE_EARTH_EXPORTS ( myTime, myIter, myThid ) |
CALL UPDATE_EARTH_EXPORTS ( myTime, myIter, myThid ) |
55 |
CALL UPDATE_CHEMISTRY_EXPORTS ( myTime, myIter, myThid ) |
CALL UPDATE_CHEMISTRY_EXPORTS ( myTime, myIter, myThid ) |
56 |
CALL FIZHI_WRAPPER ( myTime, myIter, myThid ) |
CALL FIZHI_WRAPPER ( myTime, myIter, myThid ) |
57 |
CALL STEP_FIZHI_FG ( myTime, myIter, myThid, deltaTtracer ) |
CALL STEP_FIZHI_FG ( myTime, myIter, myThid, dTtracerLev(1) ) |
|
CALL FIZHI_UPDATE_TIME ( myIter, myThid, deltaTclock ) |
|
58 |
CALL TIMER_STOP ('FIZHI [DO_ATMOSPHERIC_PHYS]',myThid) |
CALL TIMER_STOP ('FIZHI [DO_ATMOSPHERIC_PHYS]',myThid) |
59 |
endif |
endif |
60 |
#endif |
#endif |