Changeset 3780 for palm/trunk/UTIL/chemistry/gasphase_preproc/kpp4palm/bin

Timestamp:

Mar 5, 2019 11:19:45 AM (6 years ago)

Author:

forkel

Message:

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

File:

• palm/trunk/UTIL/chemistry/gasphase_preproc/kpp4palm/bin/kpp4palm.ksh (modified) (3 diffs)

palm/trunk/UTIL/chemistry/gasphase_preproc/kpp4palm/bin/kpp4palm.ksh

@@ -40 +40 @@
 # -----------------
 # $Id$ 
+# forkel   05. March 2019: cs_mech and set_cm
 # forkel   30. Oktober 2018: Integrating contents of kp4_compress into chem_gasphase_mod.f90
 # forkel   25. September 2018: Added cat for $MECH to pass mechanism name to kpp4palm
@@ -276 +277 @@
   REAL(kind=dp) :: FAKT
 
+! CS_MECH for check of mechanism name with namelist
+  CHARACTER(LEN=30) :: CS_MECH
 #ENDINLINE
 EOF
@@ -285 +288 @@
 EOF
 
+# Store mechanism name for cs_mech
+cat  >> set_cm  <<  EOF
+
+! Set cs_mech for check with mechanism name from namelist
+    cs_mech = '$MECH'
+EOF
+
 # Run kpp