Ignore:
Timestamp:
Jan 14, 2015 1:18:19 PM (7 years ago)
Author:
keck
Message:

message string

File:
1 edited

Legend:

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

    r1329 r1524  
    2020! Current revisions:
    2121! -----------------
    22 !
     22! Bugfix: increment dots_time_count after the call of subroutine check_open
    2323!
    2424! Former revisions:
     
    9393!
    9494!--    Open file for time series output in NetCDF format
     95       CALL check_open( 105 )
     96       
     97!--    Increment the counter for number of output times
     98!      CAUTION: The following line has to be after the call of the subroutine
     99!               check_open, since check_open resets the counter dots_time_count
     100!               to 0, if a new file is opened
    95101       dots_time_count = dots_time_count + 1
    96        CALL check_open( 105 )
     102       
    97103#if defined( __netcdf )
    98104!
Note: See TracChangeset for help on using the changeset viewer.