Changeset 4142


Ignore:
Timestamp:
Aug 5, 2019 12:38:31 PM (2 years ago)
Author:
suehring
Message:

Consider spinup in number of output timesteps for averaged 2D output

File:
1 edited

Legend:

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

    r4069 r4142  
    2525! -----------------
    2626! $Id$
     27! Consider spinup in number of output timesteps for averaged 2D output (merge
     28! from branch resler).
     29!
     30! 4069 2019-07-01 14:05:51Z Giersch
    2731! Masked output running index mid has been introduced as a local variable to
    2832! avoid runtime error (Loop variable has been modified) in time_integration
     
    33653369          ntdim_2d_yz(0) = ntdim_2d_yz(0) + 1
    33663370       ENDIF
    3367 
    3368        ntdim_2d_xy(1) = do2d_xy_time_count(1) + CEILING(                       &
    3369                         ( end_time - MAX( skip_time_data_output_av,            &
    3370                                           simulated_time_at_begin )            &
    3371                         ) / dt_data_output_av )
    3372 
    3373        ntdim_2d_xz(1) = do2d_xz_time_count(1) + CEILING(                       &
    3374                         ( end_time - MAX( skip_time_data_output_av,            &
    3375                                           simulated_time_at_begin )            &
    3376                                  ) / dt_data_output_av )
    3377 
    3378        ntdim_2d_yz(1) = do2d_yz_time_count(1) + CEILING(                       &
    3379                         ( end_time - MAX( skip_time_data_output_av,            &
    3380                                           simulated_time_at_begin )            &
    3381                         ) / dt_data_output_av )
     3371!
     3372!--    Please note, for averaged 2D data skip_time_data_output_av is the relavant
     3373!--    output control parameter.
     3374       ntdim_2d_xy(1) = do2d_xy_time_count(1) + CEILING(                              &
     3375                     ( end_time - MAX( MERGE( skip_time_data_output_av,               &
     3376                                              skip_time_data_output_av + spinup_time, &
     3377                                              data_output_during_spinup ),            &
     3378                                       simulated_time_at_begin )                      &
     3379                     ) / dt_data_output_av )
     3380
     3381       ntdim_2d_xz(1) = do2d_xz_time_count(1) + CEILING(                              &
     3382                     ( end_time - MAX( MERGE( skip_time_data_output_av,               &
     3383                                              skip_time_data_output_av + spinup_time, &
     3384                                              data_output_during_spinup ),            &
     3385                                       simulated_time_at_begin )                      &
     3386                     ) / dt_data_output_av )
     3387
     3388       ntdim_2d_yz(1) = do2d_yz_time_count(1) + CEILING(                              &
     3389                     ( end_time - MAX( MERGE( skip_time_data_output_av,               &
     3390                                              skip_time_data_output_av + spinup_time, &
     3391                                              data_output_during_spinup ),            &
     3392                                       simulated_time_at_begin )                      &
     3393                     ) / dt_data_output_av )
    33823394
    33833395    ENDIF
Note: See TracChangeset for help on using the changeset viewer.