Changeset 3004 for palm/trunk/SOURCE/write_restart_data_mod.f90
- Timestamp:
- Apr 27, 2018 12:33:25 PM (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/write_restart_data_mod.f90
r3003 r3004 25 25 ! ----------------- 26 26 ! $Id$ 27 ! precipitation_rate_av removed 28 ! 29 ! 3003 2018-04-23 10:22:58Z Giersch 27 30 ! z_i is also written out to use the last known inversion height from the 28 31 ! initial run as the first inversion height which is written into the … … 1078 1081 ENDIF 1079 1082 1080 IF ( ALLOCATED( precipitation_rate_av ) ) THEN1081 CALL wrd_write_string( 'precipitation_rate_av' )1082 WRITE ( 14 ) precipitation_rate_av1083 ENDIF1084 1085 1083 CALL wrd_write_string( 'pt' ) 1086 1084 WRITE ( 14 ) pt
Note: See TracChangeset
for help on using the changeset viewer.