Changeset 2894 for palm/trunk/SOURCE/user_last_actions.f90
- Timestamp:
- Mar 15, 2018 9:17:58 AM (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/user_last_actions.f90
r2718 r2894 25 25 ! ----------------- 26 26 ! $Id$ 27 ! Writing of user-defined restart data will be done in an own module called 28 ! user_write_restart_data_mod 29 ! 30 ! 2718 2018-01-02 08:49:38Z suehring 27 31 ! Corrected "Former revisions" section 28 32 ! … … 66 70 67 71 ! 68 !-- Here the user-defined actions at the end of a job follow. 69 !-- Sample for user-defined output: 70 IF ( write_binary ) THEN 71 ! IF ( ALLOCATED( u2_av ) ) THEN 72 ! WRITE ( 14 ) 'u2_av '; WRITE ( 14 ) u2_av 73 ! ENDIF 72 !-- Here the user-defined actions at the end of a job might follow. 74 73 75 WRITE ( 14 ) '*** end user *** '76 77 ENDIF78 74 79 75 END SUBROUTINE user_last_actions
Note: See TracChangeset
for help on using the changeset viewer.