- Timestamp:
- Aug 5, 2019 12:38:31 PM (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/check_parameters.f90
r4069 r4142 25 25 ! ----------------- 26 26 ! $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 27 31 ! Masked output running index mid has been introduced as a local variable to 28 32 ! avoid runtime error (Loop variable has been modified) in time_integration … … 3365 3369 ntdim_2d_yz(0) = ntdim_2d_yz(0) + 1 3366 3370 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 ) 3382 3394 3383 3395 ENDIF
Note: See TracChangeset
for help on using the changeset viewer.