Changeset 2300 for palm/trunk/SOURCE/modules.f90

Timestamp:

Jun 29, 2017 1:31:14 PM (7 years ago)

Author:

raasch

Message:

NEC related code partly removed, host variable partly removed, host specific code completely removed, default values for host, loop_optimization and termination time_needed changed

File:

• palm/trunk/SOURCE/modules.f90 (modified) (4 diffs)

palm/trunk/SOURCE/modules.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! default value for host changed to '????', default value for loop_optimization
+! changed to 'cache', default value for termination_time_needed set to 35.0
+! 
+! 2298 2017-06-29 09:28:18Z raasch
 ! missing variable descriptions have been added,
 ! type of write_binary changed from CHARACTER to LOGICAL
@@ -950 +954 @@
     CHARACTER (LEN=12)   ::  user_interface_required_revision = ' '       !< required user-interface revision number
     CHARACTER (LEN=16)   ::  conserve_volume_flow_mode = 'default'        !< namelist parameter
-    CHARACTER (LEN=16)   ::  loop_optimization = 'default'                !< namelist parameter
+    CHARACTER (LEN=16)   ::  loop_optimization = 'cache'                  !< namelist parameter
     CHARACTER (LEN=16)   ::  momentum_advec = 'ws-scheme'                 !< namelist parameter
     CHARACTER (LEN=16)   ::  psolver = 'poisfft'                          !< namelist parameter
@@ -981 +985 @@
     CHARACTER (LEN=20)   ::  timestep_scheme = 'runge-kutta-3'            !< namelist parameter       
     CHARACTER (LEN=40)   ::  topography = 'flat'                          !< namelist parameter 
-    CHARACTER (LEN=64)   ::  host = ' '                                   !< hostname on which PALM is running, ENVPAR namelist parameter provided by mrun
+    CHARACTER (LEN=64)   ::  host = '????'                                !< hostname on which PALM is running, ENVPAR namelist parameter provided by mrun
     CHARACTER (LEN=80)   ::  log_message                                  !< user-defined message for debugging (sse data_log.f90)
     CHARACTER (LEN=80)   ::  run_identifier                               !< run identifier as given by mrun option -d, ENVPAR namelist parameter provided by mrun
@@ -1337 +1341 @@
     REAL(wp) ::  s_surface = 0.0_wp                            !< namelist parameter
     REAL(wp) ::  s_surface_initial_change = 0.0_wp             !< namelist parameter
-    REAL(wp) ::  termination_time_needed = -1.0_wp             !< namelist parameter
+    REAL(wp) ::  termination_time_needed = 35.0_wp             !< namelist parameter
     REAL(wp) ::  time_coupling = 0.0_wp                        !< time since last coupling (surface_coupler)
     REAL(wp) ::  time_disturb = 0.0_wp                         !< time since last flow disturbance