Changeset 2934 for palm/trunk/SOURCE/time_integration.f90
- Timestamp:
- Mar 26, 2018 7:13:22 PM (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/time_integration.f90
r2817 r2934 25 25 ! ----------------- 26 26 ! $Id$ 27 ! Little formatting adjustment. 28 ! 29 ! 2817 2018-02-19 16:32:21Z knoop 27 30 ! Preliminary gust module interface implemented 28 31 ! … … 481 484 !-- At beginning determine the first time step 482 485 CALL timestep 483 484 486 ! 485 487 !-- Synchronize the timestep in case of nested run. … … 497 499 IF ( simulated_time == 0.0_wp ) CALL flow_statistics 498 500 CALL run_control 499 500 501 ! 501 502 !-- Data exchange between coupled models in case that a call has been omitted … … 819 820 ! 820 821 !-- Impose a turbulent inflow using synthetic generated turbulence 821 IF ( use_syn_turb_gen ) THEN822 CALL stg_main823 ENDIF822 IF ( use_syn_turb_gen ) THEN 823 CALL stg_main 824 ENDIF 824 825 825 826 !
Note: See TracChangeset
for help on using the changeset viewer.