Changeset 4196 for palm/trunk/SOURCE/parin.f90

Timestamp:

Aug 29, 2019 11:02:06 AM (5 years ago)

Author:

gronemeier

Message:

Consider rotation of model domain for claculation of Coriolis force:

• check_parameters: Overwrite rotation_angle from namelist by value from static driver;
• coriolis: Consider rotation of model domain;
• header: Write information about rotation angle;
• modules: Added rotation_angle;
• netcdf_interface_mod: replaced rotation angle from input-netCDF file by namelist parameter 'rotation_angle';
• ocean_mod: Consider rotation of model domain for calculating the Stokes drift;
• parin: added rotation_angle to initialization_parameters;

File:

• palm/trunk/SOURCE/parin.f90 (modified) (3 diffs)

palm/trunk/SOURCE/parin.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! added rotation_angle to initialization_parameters
+! 
+! 4191 2019-08-27 15:45:07Z gronemeier
 ! bugfix: add recycling_method_for_thermodynamic_quantities to inipar namelist
 ! 
@@ -191 +194 @@
              recycling_width, recycling_yshift,                                &
              reference_state, residual_limit,                                  &
+             rotation_angle,                                                   &
              roughness_length,                                                 &
              scalar_advec,   &
@@ -264 +268 @@
              recycling_width, recycling_yshift,                                &
              reference_state, residual_limit,                                  &
+             rotation_angle,                                                   &
              roughness_length, scalar_advec,                                   &
              scalar_rayleigh_damping,                                          &