Changeset 3704 for palm/trunk/SOURCE/check_open.f90
- Timestamp:
- Jan 29, 2019 7:51:41 PM (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/check_open.f90
r3655 r3704 20 20 ! Current revisions: 21 21 ! ----------------- 22 ! 22 ! Open binary files for virtual measurements 23 23 ! 24 24 ! Former revisions: … … 470 470 OPEN ( 26, FILE='SURFACE_DATA_AV_BIN'//TRIM( coupling_char )//myid_char, & 471 471 FORM='UNFORMATTED', POSITION='APPEND' ) 472 472 473 CASE ( 27 ) 474 ! 475 !-- Binary files for virtual measurement data 476 OPEN ( 27, FILE='VIRTUAL_MEAS_BIN'//TRIM( coupling_char )//myid_char,& 477 FORM='UNFORMATTED', POSITION='APPEND' ) 473 478 474 479 CASE ( 30 )
Note: See TracChangeset
for help on using the changeset viewer.