Changeset 3614 for palm/trunk/SOURCE/chem_photolysis_mod.f90
- Timestamp:
- Dec 10, 2018 7:05:46 AM (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/chem_photolysis_mod.f90
r3298 r3614 26 26 ! ----------------- 27 27 ! $Id$ 28 ! unused variables removed 29 ! 30 ! 3298 2018-10-02 12:21:11Z kanani 28 31 ! Moved USE radiation_model_mod from MODULE section into Subroutine 29 32 ! in order to use constant photolysis without radiation module (forkel) … … 136 139 137 140 138 REAL(wp) :: time_photolysis = 0.0_wp, & !< time since last call of photolysis code139 dt_photolysis = 0.0_wp, & !< hotolysis model timestep140 skip_time_do_photolysis = 0.0_wp !< Radiation model is not called before this time141 142 141 REAL(wp) :: cosz = 0.7_wp !< cosine of Zenith angle (45 deg, if not specified otherwise) 143 142
Note: See TracChangeset
for help on using the changeset viewer.