Changeset 3586
- Timestamp:
- Nov 30, 2018 1:20:29 PM (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/chemistry_model_mod.f90
r3570 r3586 27 27 ! ----------------- 28 28 ! $Id$ 29 ! Changed character lenth of name in species_def and photols_def to 15 30 ! 31 ! 32 ! 3570 2018-11-27 17:44:21Z kanani 29 33 ! resler: 30 34 ! Break lines at 132 characters … … 239 243 !- Define chemical variables 240 244 TYPE species_def 241 CHARACTER(LEN= 8):: name245 CHARACTER(LEN=15) :: name 242 246 CHARACTER(LEN=16) :: unit 243 247 REAL(kind=wp),POINTER,DIMENSION(:,:,:) :: conc … … 255 259 256 260 TYPE photols_def 257 CHARACTER(LEN= 8):: name261 CHARACTER(LEN=15) :: name 258 262 CHARACTER(LEN=16) :: unit 259 263 REAL(kind=wp),POINTER,DIMENSION(:,:,:) :: freq
Note: See TracChangeset
for help on using the changeset viewer.