Changeset 3720 for palm


Ignore:
Timestamp:
Feb 6, 2019 1:19:55 PM (3 years ago)
Author:
knoop
Message:

Made "particle_type" interoperabel with C by adding "C_BOOL" to "particle_mask"

File:
1 edited

Legend:

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

    r3655 r3720  
    242242        INTEGER(iwp) ::  group         !< number of particle group
    243243        INTEGER(idp) ::  id            !< particle ID (64 bit integer)
    244         LOGICAL      ::  particle_mask !< if this parameter is set to false the particle will be deleted
     244        LOGICAL(C_BOOL) ::  particle_mask !< if this parameter is set to false the particle will be deleted
    245245        INTEGER(iwp) ::  block_nr      !< number for sorting (removable?)
    246246    END TYPE particle_type
Note: See TracChangeset for help on using the changeset viewer.