Changeset e9e0f06 in flexpart.git for src/com_mod.f90
- Timestamp:
- Dec 12, 2018, 1:35:46 PM (5 years ago)
- Branches:
- master, 10.4.1_pesei, GFS_025, bugfixes+enhancements, dev, release-10, release-10.4.1, scaling-bug
- Children:
- 79996be9
- Parents:
- db91eb7
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
src/com_mod.f90
rc2bd55e re9e0f06 174 174 real :: ri(5,numclass),rac(5,numclass),rcl(maxspec,5,numclass) 175 175 real :: rgs(maxspec,5,numclass),rlu(maxspec,5,numclass) 176 real :: rm(maxspec),dryvel(maxspec) ,kao(maxspec)176 real :: rm(maxspec),dryvel(maxspec) 177 177 real :: ohcconst(maxspec),ohdconst(maxspec),ohnconst(maxspec) 178 ! se it is possible to associate a species with a second one to make transfer from gas to aerosol179 integer :: spec_ass(maxspec)180 178 181 179 real :: area_hour(maxspec,24),point_hour(maxspec,24)
Note: See TracChangeset
for help on using the changeset viewer.