Ignore:
Timestamp:
May 28, 2018 7:55:41 AM (3 years ago)
Author:
Giersch
Message:

Code adjusted according to coding standards, renamed namelists, error messages revised until PA0347, output CASE 108 disabled

File:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/subsidence_mod.f90

    r2718 r3045  
    2525! -----------------
    2626! $Id$
     27! Error message revised
     28!
     29! 2718 2018-01-02 08:49:38Z maronga
    2730! Corrected "Former revisions" section
    2831!
     
    145148
    146149       IF ( ocean )  THEN
    147           message_string = 'Applying large scale vertical motion is not ' // &
     150          message_string = 'Applying large scale vertical motion is not ' //   &
    148151                           'allowed for ocean runs'
    149152          CALL message( 'init_w_subsidence', 'PA0324', 2, 2, 0, 6, 0 )
Note: See TracChangeset for help on using the changeset viewer.