Changeset 3232 for palm/trunk/SOURCE/palm.f90

Timestamp:

Sep 7, 2018 12:21:44 PM (6 years ago)

Author:

raasch

Message:

references to mrun replaced by palmrun, and updated

File:

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

palm/trunk/SOURCE/palm.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! references to mrun replaced by palmrun, and updated
+! 
+! 3182 2018-07-27 13:36:03Z suehring
 ! Deduct spinup_time from RUN_CONTROL output of main 3d run 
 ! (use time_since_reference_point instead of simulated_time)
@@ -215 +218 @@
 ! Description:
 ! ------------
-!> Large-Eddy Simulation (LES) model for the convective boundary layer, 
-!> optimized for use on parallel machines (implementation realized using the
-!> Message Passing Interface (MPI)). The model can also be run on vector machines
-!> (less well optimized) and workstations. Versions for the different types of 
-!> machines are controlled via cpp-directives.
-!> Model runs are only feasible using the ksh-script mrun.
+!> Large-Eddy Simulation (LES) model for atmospheric and oceanic boundary-layer
+!> flows
+!> see the PALM homepage https://palm-model.org for further information
 !>
-!> @todo create routine last_actions instead of calling lsm_last_actions etc.
 !> @todo move chem_init call to init_3d_model or to check_parameters
 !------------------------------------------------------------------------------!
@@ -428 +427 @@
           CALL pmci_parent_initialize
 !
-!--    Exchange_horiz is needed after the nest initialization
+!--       Exchange_horiz is needed after the nest initialization
           IF ( child_domain )  THEN
              CALL exchange_horiz( u, nbgp )
@@ -545 +544 @@
 
 !
-!-- Write run number to file (used by mrun to create unified cycle numbers for
-!-- output files
+!-- Write run number to file (used by palmrun to create unified cycle numbers
+!-- for output files
     IF ( myid == 0  .AND.  runnr > 0 )  THEN
        OPEN( 90, FILE='RUN_NUMBER', FORM='FORMATTED' )