Changeset 3586 for palm/trunk/SOURCE


Ignore:
Timestamp:
Nov 30, 2018 1:20:29 PM (6 years ago)
Author:
forkel
Message:

Changed character length of name in species_def and photols_def to 15

File:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/chemistry_model_mod.f90

    r3570 r3586  
    2727! -----------------
    2828! $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
    2933! resler:
    3034! Break lines at 132 characters
     
    239243!- Define chemical variables
    240244    TYPE   species_def
    241        CHARACTER(LEN=8)                                   :: name
     245       CHARACTER(LEN=15)                                  :: name
    242246       CHARACTER(LEN=16)                                  :: unit
    243247       REAL(kind=wp),POINTER,DIMENSION(:,:,:)             :: conc
     
    255259
    256260    TYPE   photols_def                                                           
    257        CHARACTER(LEN=8)                                   :: name
     261       CHARACTER(LEN=15)                                  :: name
    258262       CHARACTER(LEN=16)                                  :: unit
    259263       REAL(kind=wp),POINTER,DIMENSION(:,:,:)             :: freq
Note: See TracChangeset for help on using the changeset viewer.