Changeset 2724 for palm/trunk/SOURCE/time_integration_spinup.f90
- Timestamp:
- Jan 5, 2018 12:12:38 PM (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/time_integration_spinup.f90
r2723 r2724 25 25 ! ----------------- 26 26 ! $Id$ 27 ! Use dt_spinup for all active components during spinup 28 ! 29 ! 2723 2018-01-05 09:27:03Z maronga 27 30 ! Bugfix: array rad_sw_in no longer exists and is thus removed from RUN_CONTROL 28 31 ! output. … … 99 102 100 103 USE radiation_model_mod, & 101 ONLY: dt_radiation, force_radiation_call, radiation,&104 ONLY: force_radiation_call, radiation, & 102 105 radiation_control, rad_sw_in, time_radiation, & 103 106 radiation_interaction, radiation_interactions … … 311 314 time_radiation = time_radiation + dt_3d 312 315 313 IF ( time_radiation >= dt_ radiation .OR. force_radiation_call )&316 IF ( time_radiation >= dt_3d .OR. force_radiation_call ) & 314 317 THEN 315 318 … … 317 320 318 321 IF ( .NOT. force_radiation_call ) THEN 319 time_radiation = time_radiation - dt_ radiation322 time_radiation = time_radiation - dt_3d 320 323 ENDIF 321 324
Note: See TracChangeset
for help on using the changeset viewer.