Ignore:
Timestamp:
Jun 2, 2009 2:16:11 PM (12 years ago)
Author:
heinze
Message:

Small change in formatting in message.f90. Bugfix in cross_sections.ncl in case of normalizing.

File:
1 edited

Legend:

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

    r311 r329  
    138138          WRITE( file_id, '(4X,A)' )  TRIM( information_string_1 )
    139139          WRITE( file_id, '(4X,A)' )  TRIM( information_string_2 )
     140          WRITE( *, '(4X,A)' )  ''
    140141!
    141142!--       Flush buffer, if requested
Note: See TracChangeset for help on using the changeset viewer.