Ignore:
Timestamp:
Apr 24, 2019 5:31:34 PM (2 years ago)
Author:
suehring
Message:

Add missing if statements for call of pmc_set_dataarray_name for TKE and dissipation; minor bugfix for nesting of chemical species

File:
1 edited

Legend:

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

    r3655 r3932  
    2121! Current revisions:
    2222! ------------------
    23 !
     23! Increase character length so that also chemistry variable names fully fit
    2424!
    2525! Former revisions:
     
    132132       TYPE(C_PTR)               :: SendBuf      !< data pointer in send buffer
    133133       TYPE(C_PTR)               :: RecvBuf      !< data pointer in receive buffer
    134        CHARACTER(LEN=8)          :: Name         !< name of array
     134       CHARACTER(LEN=da_namelen) :: Name         !< name of array
    135135       TYPE(arraydef), POINTER   :: next
    136136    END TYPE arraydef
Note: See TracChangeset for help on using the changeset viewer.