Changeset 4539 for palm/trunk/SOURCE/read_restart_data_mod.f90
- Timestamp:
- May 18, 2020 2:05:17 PM (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/read_restart_data_mod.f90
r4536 r4539 25 25 ! ----------------- 26 26 ! $Id$ 27 ! location message added 28 ! 29 ! 4536 2020-05-17 17:24:13Z raasch 27 30 ! binary version incremented 28 31 ! … … 1438 1441 ! 1439 1442 !-- Read data from previous model run. 1440 CALL cpu_log( log_point_s(14), 'rrd_local', 'start' ) 1443 CALL cpu_log( log_point_s(14), 'read-restart-data-local', 'start' ) 1444 1445 CALL location_message( 'reading local restart data', 'start' ) 1441 1446 1442 1447 IF ( TRIM( restart_data_format_input ) == 'fortran_binary' ) THEN … … 2482 2487 ENDIF 2483 2488 2489 CALL location_message( 'reading local restart data', 'finished' ) 2484 2490 ! 2485 2491 !-- End of time measuring for reading binary data 2486 CALL cpu_log( log_point_s(14), 'r rd_local', 'stop' )2492 CALL cpu_log( log_point_s(14), 'read-restart-data-local', 'stop' ) 2487 2493 2488 2494 END SUBROUTINE rrd_local
Note: See TracChangeset
for help on using the changeset viewer.