Ignore:
Timestamp:
Apr 16, 2009 12:07:26 PM (12 years ago)
Author:
raasch
Message:

changes for coupling with independent precursor runs; z_i calculation with Sullivan criterion

File:
1 edited

Legend:

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

    r274 r291  
    44! Current revisions:
    55! -----------------
     6! Coupling with independent precursor runs.
    67! Output of messages replaced by message handling routine
    78!
     
    9697!
    9798!-- Set the stop flag also, if restart is forced by user
    98     IF ( time_restart /= 9999999.9  .AND.  time_restart < simulated_time ) &
    99     THEN
     99    IF ( time_restart /= 9999999.9  .AND.  &
     100         time_restart < time_since_reference_point )  THEN
     101
    100102!
    101103!--    Restart is not neccessary, if the end time of the run (given by
Note: See TracChangeset for help on using the changeset viewer.