Ignore:
Timestamp:
Mar 5, 2019 11:19:45 AM (5 years ago)
Author:
forkel
Message:

removed read from unit 10 in chemistry_model_mod.f90, added get_mechanismname

File:
1 edited

Legend:

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

    r3652 r3780  
    2727! -----------------
    2828! $Id$
     29! added cs_mech
     30!
     31!
     32! 3652 2019-01-07 15:29:59Z forkel
    2933! parameter chem_mechanism added (basit)
    3034!
     
    6670
    6771    USE chem_gasphase_mod,                                                     &   
    68         ONLY: nspec, nvar, spc_names
     72        ONLY: cs_mech, nspec, nvar, spc_names
    6973
    7074    USE control_parameters,                                                    &
     
    7983    IMPLICIT NONE
    8084
     85    PUBLIC cs_mech
    8186    PUBLIC nspec
    8287    PUBLIC nvar
Note: See TracChangeset for help on using the changeset viewer.