Changeset 2920 for palm/trunk/SOURCE/init_3d_model.f90
- Timestamp:
- Mar 22, 2018 11:22:01 AM (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/init_3d_model.f90
r2906 r2920 25 25 ! ----------------- 26 26 ! $Id$ 27 ! Add call for precalculating apparent solar positions (moh.hefny) 28 ! 29 ! 2906 2018-03-19 08:56:40Z Giersch 27 30 ! The variables read/write_svf_on_init have been removed. Instead ENVIRONMENT 28 31 ! variables read/write_svf have been introduced. Location_message has been … … 494 497 radiation_calc_svf, radiation_write_svf, & 495 498 radiation_interaction, radiation_interactions, & 496 radiation_interaction_init, radiation_read_svf 499 radiation_interaction_init, radiation_read_svf, & 500 radiation_presimulate_solar_pos 497 501 498 502 USE random_function_mod … … 2349 2353 ! 2350 2354 !-- If required, initialize radiation interactions between surfaces 2351 !-- via sky-view factors. This must be done befo e radiation is initialized.2355 !-- via sky-view factors. This must be done before radiation is initialized. 2352 2356 IF ( radiation_interactions ) CALL radiation_interaction_init 2353 2357 … … 2357 2361 CALL radiation_init 2358 2362 CALL location_message( 'finished', .TRUE. ) 2363 2364 ! 2365 !-- Find all discretized apparent solar positions for radiation interaction. 2366 !-- This must be done after radiation_init. 2367 IF ( radiation_interactions ) CALL radiation_presimulate_solar_pos 2359 2368 2360 2369 !
Note: See TracChangeset
for help on using the changeset viewer.