Changeset 2696 for palm/trunk/SOURCE/write_3d_binary.f90
- Timestamp:
- Dec 14, 2017 5:12:51 PM (6 years ago)
- Location:
- palm/trunk
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk
-
palm/trunk/SOURCE
-
palm/trunk/SOURCE/write_3d_binary.f90
r2292 r2696 1 1 !> @file write_3d_binary.f90 2 2 !------------------------------------------------------------------------------! 3 ! This file is part of PALM.3 ! This file is part of the PALM model system. 4 4 ! 5 5 ! PALM is free software: you can redistribute it and/or modify it under the … … 25 25 ! ----------------- 26 26 ! $Id$ 27 ! + kh_av, km_av (TG) 28 ! 29 ! 2292 2017-06-20 09:51:42Z schwenkel 27 30 ! Implementation of new microphysic scheme: cloud_scheme = 'morrison' 28 31 ! includes two more prognostic equations for cloud drop concentration (nc) … … 162 165 ! 163 166 !-- Write arrays. 164 binary_version = '4. 5'167 binary_version = '4.6' 165 168 166 169 WRITE ( 14 ) binary_version … … 179 182 WRITE ( 14 ) 'iran '; WRITE ( 14 ) iran, iran_part 180 183 WRITE ( 14 ) 'kh '; WRITE ( 14 ) kh 184 IF ( ALLOCATED( kh_av ) ) THEN 185 WRITE ( 14 ) 'kh_av '; WRITE ( 14 ) kh_av 186 ENDIF 181 187 WRITE ( 14 ) 'km '; WRITE ( 14 ) km 188 IF ( ALLOCATED( km_av ) ) THEN 189 WRITE ( 14 ) 'km_av '; WRITE ( 14 ) km_av 190 ENDIF 182 191 IF ( ALLOCATED( lpt_av ) ) THEN 183 192 WRITE ( 14 ) 'lpt_av '; WRITE ( 14 ) lpt_av
Note: See TracChangeset
for help on using the changeset viewer.