Ignore:
Timestamp:
Oct 30, 2019 4:01:14 PM (2 years ago)
Author:
resler
Message:

Merge branch resler into trunk

Location:
palm/trunk
Files:
3 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk

  • palm/trunk/SOURCE

  • palm/trunk/SOURCE/nesting_offl_mod.f90

    r4273 r4286  
    2525! -----------------
    2626! $Id$
     27! Fix wrong checks of time from dynamic driver in nesting_offl_mod
     28!
     29! 4273 2019-10-24 13:40:54Z monakurppa
    2730! Add a logical switch nesting_offline_chem
    2831!
     
    20322035!--    not for the soil/wall spinup. However, as the spinup time is added
    20332036!--    to the end_time, this must be considered here.
    2034        IF ( end_time - spinup_time >                                           &
    2035             nest_offl%time(nest_offl%nt-1) - time_utc_init )  THEN
     2037       IF ( end_time - spinup_time > nest_offl%time(nest_offl%nt-1) )  THEN
    20362038          message_string = 'end_time of the simulation exceeds the ' //        &
    20372039                           'time dimension in the dynamic input file.'
    20382040          CALL message( 'nesting_offl_init', 'PA0183', 1, 2, 0, 6, 0 )
    2039        ENDIF
    2040 
    2041        IF ( nest_offl%time(0) /= time_utc_init )  THEN
    2042           message_string = 'Offline nesting: time dimension must start at ' // &
    2043                            ' time_utc_init.'
    2044           CALL message( 'nesting_offl_init', 'PA0676', 1, 2, 0, 6, 0 )
    20452041       ENDIF
    20462042!
Note: See TracChangeset for help on using the changeset viewer.