Changeset 1831 for palm/trunk/SOURCE/read_var_list.f90
- Timestamp:
- Apr 7, 2016 1:15:51 PM (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/read_var_list.f90
r1818 r1831 19 19 ! Current revisions: 20 20 ! ------------------ 21 ! 21 ! turbulence renamed collision_turbulence, drizzle renamed cloud_water_sedimentation 22 22 ! 23 23 ! Former revisions: … … 165 165 166 166 USE cloud_parameters, & 167 ONLY: c_sedimentation, curvature_solution_effects, & 168 limiter_sedimentation, nc_const, ventilation_effect 167 ONLY: c_sedimentation, collision_turbulence, & 168 cloud_water_sedimentation, limiter_sedimentation, & 169 nc_const, ventilation_effect 169 170 170 171 USE control_parameters … … 183 184 184 185 USE particle_attributes, & 185 ONLY: time_sort_particles186 ONLY: curvature_solution_effects, time_sort_particles 186 187 187 188 USE pegrid … … 206 207 !-- Make version number check first 207 208 READ ( 13 ) version_on_file 208 binary_version = '4. 0'209 binary_version = '4.1' 209 210 IF ( TRIM( version_on_file ) /= TRIM( binary_version ) ) THEN 210 211 WRITE( message_string, * ) 'version mismatch concerning control ', & … … 401 402 CASE ( 'dpdxy' ) 402 403 READ ( 13 ) dpdxy 403 CASE ( ' drizzle' )404 READ ( 13 ) drizzle404 CASE ( 'cloud_water_sedimentation' ) 405 READ ( 13 ) cloud_water_sedimentation 405 406 CASE ( 'dt_pr_1d' ) 406 407 READ ( 13 ) dt_pr_1d … … 661 662 CASE ( 'tsc' ) 662 663 READ ( 13 ) tsc 663 CASE ( ' turbulence' )664 READ ( 13 ) turbulence664 CASE ( 'collision_turbulence' ) 665 READ ( 13 ) collision_turbulence 665 666 CASE ( 'turbulent_inflow' ) 666 667 READ ( 13 ) turbulent_inflow
Note: See TracChangeset
for help on using the changeset viewer.