Ignore:
Timestamp:
Jun 10, 2009 11:19:35 AM (12 years ago)
Author:
raasch
Message:

several small bugfixes; some more dvrp changes

File:
1 edited

Legend:

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

    r328 r336  
    44! Current revisions:
    55! -----------------
     6! dt_fixed is read into a dummy variable.
    67! Output of messages replaced by message handling routine.
    78! +canyon_height, canyon_width_x, canyon_width_y, canyon_wall_left,
     
    7778    CHARACTER (LEN=10) ::  binary_version, version_on_file
    7879    CHARACTER (LEN=30) ::  variable_chr
     80
     81    LOGICAL ::  ldum
    7982
    8083
     
    266269             READ ( 13 )  drag_coefficient
    267270          CASE ( 'dt_fixed' )
    268              READ ( 13 )  dt_fixed
     271             READ ( 13 )  ldum   ! restart files created before rev 333
     272                                 ! contained dt_fixed by mistake; it is still
     273                                 ! read here in order to allow usage of these
     274                                 ! older restart files; can be removed in a
     275                                 ! later version
    269276          CASE ( 'dt_pr_1d' )
    270277             READ ( 13 )  dt_pr_1d
Note: See TracChangeset for help on using the changeset viewer.