Changeset 82 for palm/trunk/SOURCE/run_control.f90
- Timestamp:
- Apr 16, 2007 3:40:52 PM (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/run_control.f90
r4 r82 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! 6 ! Preprocessor strings for different linux clusters changed to "lc", 7 ! routine local_flush is used for buffer flushing 7 8 ! 8 9 ! Former revisions: … … 89 90 advected_distance_x/1000.0, & 90 91 advected_distance_y/1000.0, mgcycles 91 #if defined( __ibm )92 92 ! 93 93 !-- Write buffer contents to disc immediately 94 CALL FLUSH_( 15 ) 95 #elif defined( __lcmuk ) || defined( __lctit ) || defined( __nec ) 96 CALL FLUSH( 15 ) 97 #endif 94 CALL local_flush( 15 ) 95 98 96 ENDIF 99 97 !
Note: See TracChangeset
for help on using the changeset viewer.